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PREFACE 


Preface 

The  Department  of  Defense  funded  the  development  of  the 
Ada  programming  Language  in  an  effort  to  significantly 
reduce  costs  for  programming  embedded  computer  systems.  As 
the  language  evolved,  it  became  apparent  that  its  power 
would  be  useful  in  a  wide  range  of  other  programming 
applications  as  well.  Since  the  Department  of  Defense  has  a 
large  number  and  wide  variety  of  small  computers,  all  of 
which  could  benefit  greatly  from  Ada,  it  seemed  that  a 
portable  compiler  could  be  extremely  valuable.  One  proven 
implementation  of  a  portable  high-level  language  compiler  is 
UCSD  PASCAL  which  generates  code  for  a  hypothetical 
processor  called  a  pseudo-machine.  To  run  this  code  on  an 
actual  computer  requires  a  software  program  to  simulate  the 
pseudo-machine.  This  approach  allowed  PASCAL  to  be 
available  on  many  different  small  computers.  Investigation 
of  the  same  techniques  used  in  this  implementation  would 
possibly  be  the  Key  to  providing  a  portable  Ada  compiler. 
Initiating  such  research  at  AFIT  would  provide  a  test  bed 
for  development  of  this  concept  and  provide  a  basis  for 
further  research  in  Ada  and  its  programming  environment. 
This  seemed  like  a  good  prospect  for  a  thesis  topic,  since 
both  AFIT  and  the  Air  Force  could  benefit. 


The  preliminary  reference  manual  for  Ada  was  released 
about  the  same  time  I  started  my  first  compiler- theory 
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class.  As  Cline  passed,  my  interest  in  both  Ada  and  compiler 
theory  A^ew,  as  did  ray  desire  to  do  a  thesis  topic  that 
would  combine  both  subjects.  When  Capt  Role  Black  and  Aaj 
Alan  Ross,  AFIT  professors,  voiced  interest  in  the  design  of 
an  Ada  pseudo-machine,  I  felt  chat  this  would  be  the  perfect 
topic  for  me.  Designing  Che  pseudo-machine  would  require 
integrating  techniques  from  several  areas  in  the 
computer-science  field.  Compiler  theory,  data  structures 
and  computer  architecture  are  all  intertwined,  offering  a 
potentially-rewarding,  learning  experience. 

My  initial  scab  at  this  topic  was  to  design  the 
pseudo-machine  and  Chen  build  a  test  compiler  to  exercise 
Che  design.  This  uncoupled  development  of  the 
pseudo-machine  and  the  compiler  turned  out  to  be  incorrect. 

The  process  of  defining  a  pseudo-machine  for  a  language 
is,  in  fact,  closely  coupled  to  the  development  of  a 
compiler  for  that  language.  Niklaus  Wirch,  designer  of 
PASCAL,  stated  that  Che  purpose  of  a  pseudo-machine  was  to 
"keep  Che  description  of  the  compiler  reasonably  simple  and 
free  from  extraneous  considerations  of  peculiar  properties 
of  a  real,  existing  processor  (Ref  14:331)".  If  this  is  the 
case,  defining  the  Ada  pseudo-machine  without  developing  the 
compiler  would  be  difficult,  since  the  success  of  the 
pseudo-machine  is  measured  by  how  well  Che  machine  supports 
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cue  compiler. 

Thus,  the  project  was  modified  tj  permit  Che  parallel 
development  of  the  compiler  with  the  definition  of  the 
pseudo-machine,  and  the  project's  scope  was  reduced.  The 
new  ijoal  became  an  integer-only  implementation  which 
incorporated  some  of  Ada's  more  interesting  features,  for 
example,  packages  and  casks.  Additional  constructs  were 
studied  based  on  their  estimated  impact  on  the 
pseudo-machine's  architecture. 

Throughout  the  project's  development,  several  people 
sacrificed  their  time  to  offer  council,  suggestions,  and 
materials.  The  time  they  Invested  immeasurably  improved  the 
project's  overall  quality.  Thanks  to  Cape  Roie  R.  Slack, 
advisor,  who  proposed  the  topic  and  helped 'limit  its  scope. 
His  interest,  encouragement  and  suggestions  were  invaluable. 
Thanks  to  Major  Dan  Burton,  currently  assigned  to  the  Air 
Force  Avionics  Lab,  who  sponsored  the  project  and  allowed  me 
to  use  the  lab's  excellent  computer  facilities.  Thanks  also 
to  my  thesis-committee  members,  LC  Col  Jim  Rutledge  and  Maj 
Alan  Ross.  Lt  Col  Rutledge's  indepch  knowledge  of  Ada  proved 
very  valuable.  He  sacrificed  nximerous  hours  listening  and 
teaching,  and  he  also  composed  several  test  programs  to  help 
debug  the  project.  Major  Ross  served  as  a  thoughtful  critic 
who,  in  concert  with  Capt  Black,  identified  the  Ada 
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pseudo-machine  as  a  possible  thesis  topic.  Finally,  I'd 
like  to  thank  my  wife  whose  patience  with  a  full-time 
student  and  a  baby  boy  (born  during;  my  first  quarter  at 
AFIT) ,  was  nothin^j  short  of  miraculous. 
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ABSTRACT 


Abstract 

This  project  involved  defining  an  Ada  pseudo-machine 
and  developing  an  Ada  to  pseudo-code  test  translator.  The 
translator's  front-end  incorporates  a  table-driven  parser 
that  can  parse  the  entire  proposed-s tandard  Ada  language. 
The  translator's  semantic  routines  allow  integer  data 
objects,  several  control  structures,  procedures,  functions, 
packages  and  tasks.  These  routines  generate  pseudo-code 
that  is  executed  by  an  interpreter  program  included  in  the 
translator.  The  interpreter  constitutes  a  complete 
description  of  the  pseudo-machine  whose  architecture 
consists  of  multiple,  stack-oriented  processors  that  access 
a  common  memory.  Interesting  features  of  the  project 
include  the  hash-coded  symbol  table  that  supports  Ada's 
visibility  rules  and  the  pseudo-machine  architecture  that 
supports  Ada's  tasking. 
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INTRODUCTION 


1 .  Incroduction 

Chapter  one  begins  with  background  information  on  the 
origin  of  the  computer  programming  language  Ada  and  with  a 
summary  of  the  features  which  have  resulted  in  its  rapid 
growth  in  popularity.  The  chapter  concludes  with  a 
description  of  how  Ada  can  be  implemented  on  a  micro  or  mini 
computer  and  with  an  introductory  description  of  the  thesis 
proj  ect . 

1.1  Background  —  Ada's  roots 

Increasing  software  costs  have  forced  the  Department  of 
Defense  to  search  for  budget  reducing  strategies.  An 
outgrowth  of  this  search  was  the  development  of  a  new 
computer  language  with  a  soon  to  be  familiar  name,  Ada.  Its 
introduction  met  with  both  opposition  and  enthusiasm,  but 
currently,  most  of  the  opposition  is  fading  and  Ada  is 
experiencing  a  broadening  appeal. 

1.1.1  The  problem  that  spawned  a  language 

Every  year,  more  and  more  money  is  spent  on  computer 
systems,  despite  precipitous  drops  in  computer  hardware 
costs.  These  falling  hardware  costs  have  been  matched  by  an 
equivalent  increase  in  software  costs,  and  now,  software 
looms  at  the  forefront  as  the  major  development  expense. 
The  Department  of  Defeiise  is  not  immune  to  this  problem,  and 
it  too  must  face  the  problem  of  rising  expenditures. 
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Within  DOD,  the  major  software  expense  is  for 
programming  embedded  computer  systems,  and  more  than  507<,  of 
the  software  budget  goes  toward  satisfying  the  demand  for 
such  software  (Ref  4:6).  Why  is  programming  embedded 
systems  so  costly?  A  preliminary  study  showed  that  one  of 
the  problems  has  been  the  plethora  of  special-purpose 
languages  and  systems  used  to  program  them.  The  study 
showed  that  a  common  language  could  save  in  excess  of  1 
billion  dollars  a  year  (Ref  5) .  The  data  on  which  this 
estimate  is  based  can  be  found  in  appendix  I. 

1 .1  .2  A  solution  in  commonality 

To  correct  this  problem,  DOD  pursued  the  goal  of  a 
single,  high-level  computer  language  appropriate  for 
programming  embedded  systems  and  established  the  High  Order 
Language  Commonality  Program  in  1975  to  railroad  the  project 
(Ref  3:i).  The  program's  directors  compiled  a  set  of 
requirements  for  the  proposed  language  by  circulating  a 
request  for  language  requirements  throughout  the  military, 
civilian  and  industrial  communities  of  the  U.S.  and,  also, 
throughout  European  and  NATO  countries.  The  submitted 
requirements  were  integrated,  refined  and  then  returned  to 
the  respondents  for  approval.  After  several  such  cycles, 
the  resulting  set  of  requirements  was  deemed  necessary  and 
sufficient  for  all  DOD  embedded  computer  applications. 
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Several  exiscing  high-order  languages  were  examined  to 
see  if  one  satisfied  the  complete  set  of  requirements,  but 
none  did.  Therefore,  four  contractors  were  funded  to 
develop  a  language  which  would  meet  the  required 
specifications.  After  this  four-contractor 
competitive-design  effort,  a  single  language  emerged  and  was 
named  Ada.  Currently,  Ada  stands  at  a  major  transition 
point  in  its  development,  as  emphasis  shifts  from  the  design 
of  the  language  to  its  introduction  and  use. 

1.1.3  Ada's  broadening  appeal 

The  major  goal  of  Ada's  design  was  to  reduce  costs  for 
embedded-computer  software.  While  pursuing  this  goal,  DOD 
specified  requirements  for  a  working  environment  for  the 
language.  These  requirements  are  delineated  in  the 
document:  "STONEMAN,  Requirements  for  Ada  Programming 
Support  Environments",  Feb  1980.  The  stated  purpose  of  the 
programming- support  environment  is  to  "support  the 
development  and  maintenance  of  Ada  applications  software 
throughout  its  life  cycle,  with  particular  emphasis  on 
software  for  embedded  applications"  (Ref  3:1).  To  meet  this 
goal,  a  host/ target  approach  to  software  construction  is 
adopted.  This  approach  entails  developing  programs  for  an 
embedded  target  computer  on  a  host  computer  that  offers 
extensive  support  facilities  (Ref  3:8).  The  document  goes 
on  to  specify  what  support  facilities  the  host  system  must 


3 


INTRODUCTION 


have . 


While  this  standard  environment  will  do  much  to  make 
Ada  a  powerful  and  popular  tool  for  programming  embedded 
systems,  the  language  has  features  that  have  opened  another, 
perhaps-larger,  market.  This  market  is  among  system  and 
applications  programmers  who  develop  software  for  use  on  the 
host  processor. 

Ada  has  several  features  that  have  stimulated  this 
interest.  Some  of  the  most  interesting  of  these  will  be 
discussed  briefly.  These  include  packages,  tasks,  separate 
compilation  and  the  promise  of  universality.  More  detailed 
information  can  be  found  in  the  Ada  reference  manual  (Ref 
2). 


Packages ;  Packages  are  a  mechanism  for  isolating 
logically  related  structures  in  the  program  text  whether 
they  are  subprograms,  data  types,  variables,  nested 
packages  or  a  combination  of  these.  This  mechanism  clearly 
distinguishes  information  that  is  accessible  only  within  the 
package  from  that  which  is  accessible  to  the  rest  of  the 
program.  Information  accessible  only  within  the  package  is 
considered  'hidden'  and  cannot  be  altered  or  even  accessed 
outside  the  package.  This  provides  the  programmer  with  a 
powerful  tool  for  creating  abstract  data  types  whose 
implementation  details  are  completely  hidden  from  the  user, 
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for  writing  modular  programs  with  enforced  module  boundaries 
and  for  writing  programs  that  can  be  more  easily  verified 
(Refs  2:7-1  -  7-11;  9:8-1 )  . 

Tasks :  Tasks  are  Ada's  construct  for  parallel 
processing.  A  task  is  known  to  other  tasns  in  the  program 
by  a  set  of  names  called  entries.  When  ore  task  calls 
another,  one  of  these  names  must  oe  specified. 
Synchronization  of  the  two  tasks  is  achieved  when  the  called 
task  accepts  the  call  of  that  named  entry.  This  mechanism 
provides  the  programmer  with  a  simple,  but  powerful,  method 
for  specifying  parallel  activities  that  must  communicate 
(Ref  2:9-1  -  9-16) . 


Separate  compilation :  Ada  supports  separate 
compilation  as  opposed  to  independent  compilation.  The 
distinction  between  the  two  was  first  made  by  J.J.  Horning 
and  is  described  in  the  preliminary  reference  manual.  The 
description  is  reproduced  here  for  convenience. 


Independent  compilation  has  been  achieved  by  most 
assembly  languages  and  also  by  languages  such  as 
Fortran  and  PL/1 .  Compilation  of  individual  modules 
is  performed  independently  in  the  sense  that  such 
modules  have  no  way  of  sharing  knowledge  of 
properties  defined  in  other  modules. 

Independent  compilation  is  usually  achieved  with 
a  lower  level  of  checks  between  units  than  is 
possible  within  a  single  compilation  unit.  In 
consequence,  independent  compilation  came  into 
disrepute  and  was  rejected  by  safety  minded,  early 
typed  language  definitions  such  as  Algol  68  and 
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Pascal.  Fasc  compilation  of  the  complete  program 
was  often  advocated  by  promoters  of  these  languages 
as  a  safe  alternative  to  independent  compilation. 
Fast  compilation,  hovever,  has  its  limits,  and  it 
fails  to  answer  the  needs  of  confidentiality  and 
libraries. 

Separate  compilation,  on  the  other  hand, 
reconciles  type  safety  and  the  pragmatic  reasons  for 
compiling  in  parts.  It  is  based  on  the  use  of  a 
library  file  which  contains  a  record  of  previous 
compilations  of  the  units  which  form  a  program  (Ref 
9:10-1) . 


In  summary,  independent  compilation  provides  little  or 
no  checking  for  comparability  between  individually  compiled 
modules.  On  the  ocher  hand,  separate  compilation  provides 
Che  same  level  of  checking  between  individually  compiled 
modules  as  they  would  get  if  they  were  compiled  together. 

Universality:  Ada  holds  the  promise  of  being  a 
universally  accepted  standard  language.  The  list  of 
benefits  that  could  be  derived  from  such  a  language  would  be 
very  long,  and  one  can  only  hope  that  this  will  indeed  come 
Co  pass  (Ref  4).  DOD's  mandate  that  Ada  will  be  "the" 
language  for  programming  embedded  systems  is  the  foot  in  the 
door  for  such  a  possibility.  Hopefully,  this  door  will  open 
completely  as  DOD  and  commercial  interests  cash  in  on  the 
language's  powerful  features. 

Collectively,  these  features  support  the  concept  of 
standard  software  components  first  espoused  by  M.D.  Mcllroy 
in  1969,  and  enthusiastically  supported  by  Jean  D.  Ichbiah 


INTRODUCTION 


ac  the  ACM  SIGPLAN  conference  on  Ada  in  1980. 
Over-simplifying,  a  software  component  refers  to  a 
functional  module  that  has  been  coded  and  verified.  Such  a 
component  could  be  "manufactured"  by  a  specialty  company  and 
then  be  compiled  with  other  such  components  into  software 
catalogs.  On  the  "consumer's"  side,  software  developers 
could  refer  to  these  catalogs  and  choose  those  components 
needed  for  their  project.  Once  delivered,  the  components 
could  be  "wired"  together  to  create  the  finished  system. 
Since  the  functional  modules  are  already  assembled,  tested 
and,  possibly,  guaranteed  by  the  manufacturer,  less  time 
should  be  necessary  for  system  development  and  testing. 
Ada's  features  have  sparked  the  hope  that  standard 
components  may  soon  be  a  reality. 

1 .1 .4  Ada  and  the  small  computer 

A  large,  potential  market  for  software  components,  and 
thus  for  Ada,  exists  among  micro  and  mini  computer  users. 
However,  these  users  must  have  Ada  running  on  their  machines 
in  order  to  use  these  components.  Since  small  machines 
generally  cannot  support  an  extensive  environment,  they  must 
have  a  specially  designed  Ada  language  environment  tailored 
to  their  capabilities. 

Hosting  Ada  on  small  machines  is  a  topic  reminiscent  of 
the  UCSD  PASCAL  effort  where  PASCAL,  a  language  seemingly 
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too  cj.nplex  to  host  on  a  micro,  was  quite  successfully 
implemented.  The  excellent  results  achieved  by  the  UCSD 
PASCAL  project  served  to  motivate  this  investigation  of  the 
same  techniques  as  applied  to  Ada.  The  project  reported  in 
this  paper  specifically  deals  with  the  concurrent 
development  of  an  Ada  pseudo-machine  and  an  Ada  to 
pseudo-code  translator,  with  emphasis  on  the 
pseudo-machine's  architecture.  Some  of  the  results  of  the 
project,  namely  the  pseudo-machine  definition  and  the 
semantic  routines  from  the  translator,  could  serve  as  a  good 
starting  point  for  the  implementation  of  an  Ada  environment 
on  a  micro-computer  host.  The  following  section  describes 
the  pseudo-machine  approach  and  then  introduces  the  project 
more  fully. 

1 .1 .5  Needed  --  a  portable  compiler 

The  most  important  part  of  this  micro/mini  Ada 
environment  is  the  compiler.  Since  there  is  a  variety  of 
processors  in  the  micro  and  mini  class,  the  compiler  program 
should  be  written  incorporating  techniques  that  enhance  its 
portability.  A  technique  that  achieves  this,  with  excellent 
results,  is  the  pseudo-code  compiler.  In  this  technique, 
the  compiler  generates  code  (pseudo-code)  for  a  hypothetical 
processor.  This  processor's  instruction  set  is  specifically 
designed  to  make  the  compilation  task  easier  and  more 
straight-forward  than  attempting  to  generate  code  for  an 
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actual  processor.  The  pseudo-code  is  then  executed  by  an 
interpreter  program  which  runs  on  the  actual  processor.  The 
steps  necessary  to  develop  such  a  compiler  are  briefly 
outlined  below. 

1.1 .5.1  The  pseudo-code  compiler 

The  first  step  toward  developing  a  pseudo-code  compiler 
is  to  write  the  Ada  to  pseudo-code  compiler  program  in  a 
suitable  language  on  a  host  processor.  The  resulting 
program,  called  a  cross  compiler,  accepts  Ada  source  text  as 
input  and  generates  pseudo-code  for  the  hypothetical 
processor  as  output.  Now,  a  production-quality  compiler  is 
written  in  Ada.  This  program  is  input  to  the  cross  compiler 
and  translated  to  pseudo-code.  The  output  from  this  step  is 
pseudo-code  for  the  production  compiler.  Now,  all  that  is 
needed  to  execute  the  compiler  program  is  a  pseudo-machine. 
Since  no  pseudo-machines  actually  exist  yet,  a  simulator 
must  be  created.  This  may  be  done  by  writing  a  program  that 
accepts  the  pseudo-code  as  input  and  that  accomplishes  the 
necessary  actions.  Such  a  program  is  sometimes  called  an 
interpreter.  With  this  approach,  all  that  needs  to  be  done 
to  install  the  Ada  compiler  on  a  new  processor  is  to  write  a 
relatively-simple,  pseudo-code,  interpreter  program  to  run 
on  the  processor. 
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1  .1  .5.2  Advantages/ disadvantages 

Since  installing  the  compiler  on  another  processor  is 
limited  to  writing  a  relatively-simple  program,  the  goal  of 
easy  portability  is  attained.  All  system  software,  e.g.  the 
editor,  debugger,  etc.,  should  also  be  written  in  Ada  and 
compiled  to  pseudo-code,  thus  attaining  the  same  portability 
as  the  compiler. 

Of  course,  running  the  interpreter  program  decreases 
execution  speed  as  compared  to  executing  native  machine 
code.  The  trade  off  is  speed  for  portability.  However,  the 
popularity  of  current  PASCAL  pseudo-code  implementations  is 
a  testimony  that,  for  most  purposes,  this  degredation  in 
performance  is  acceptable  to  a  wide  market  of  users. 
However,  should  perfomnance  be  degraded  to  unacceptable 
levels,  speed  can  be  improved  by  post  processing  the  code 
or,  even  better,  by  creating  the  hypothetical  processor. 

Pos t  processing :  Pseudo-code  generated  by  the  compiler 
can  be  post  processed  to  produce  code  for  the  target 
machine.  An  optimizing,  pseudo-code  to  target-machine 
translator  would  eliminate  the  run-time,  interpretation 
penalty;  thus  increasing  the  program’s  execution  speed. 

Building  the  hypothetical  processor :  Building  the 
hypothetical  processor  eliminates  any  need  for  post 
processing  the  pseudo-code  to  speed  up  execution. 

10 


i 


4 


INTRODUCTION 


Pseudo-code  i^enerated  by  Che  compiler  is  native  machine-code 
for  the  hypothetical  processor,  and  thus,  no  translation  is 
required.  Western  Digital  Corporation  used  this  technique 
Co  build  their  PASCAL  Micro-Engine  by  micro-programming  an 
LSI  n  chip  set  to  emulate  the  UCSD  PASCAL  pseudo-machine. 
The  excellent  result  is  a  premium,  high-speed,  UCSD-PASCAL 
implementation  that  executes  on  a  micro/mini  computer. 

Now  that  some  background  information  on  pseudo-code 
compiling  has  been  covered,  Che  thesis  project  will  be 
described.  This  project,  while  not  directly  involved  with 
building  the  finished  compiler  for  an  Ada  pseudo-code 
implementation,  has  laid  the  foundation  for  such  an  effort. 

1  .i.  Project  overview 

The  project  consisted  of  the  concurrent  development  of 
an  Ada  to  pseudo-code  translator  and  an  Ada  pseudo-machine. 
First,  a  parser  for  the  language  was  built  using  Lawrence 
Livermore  Laboratory's  automatic  parser  generator  and 
Intermetric  Inc.'s  LR(1)  Ada  grammar  (Refs  12,  13).  Then, 
language  constructs  were  investigated  beginning  with 
packages.  Packages  had  no  impact  on  the  runtime 
architecture  of  the  pseudo-machine,  but  profoundly  affected 
the  compiler's  symbol  table  and  symbol- table-access 
routines.  Separate  compilation  and  its  possible  impact  on 
the  structure  of  the  symbol  table  was  not  investigated. 
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Next,  expressions  were  implemented  followed  by  procedures 
and  functions.  These  features  delineated  the  basic 

requirements  for  the  pseudo-machine,  and  a  stack  processor 
was  selected  to  meet  those  requirements.  Finally,  tasks 
were  investigated.  Tasks  added  several  operators  to  the 
pseudo-machine's  instruction  set  and  prompted  a 

multi-processor  architecture.  The  following  chapter 

describes  each  of  the  project's 
pseudo-machine  and  the  compiler. 


two  parts: 


the 
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2.  ProjecC  Descrip Cion 

This  chapter  begins  by  describing  the  approach  to  Che 
project  and  by  discussing  some  of  the  design  considerations 
that  prompted  the  resulting  system  architecture.  Later 
sections  describe  the  pseudo-machine's  architecture, 
including  its  instruction  sec  and  describe  the  Ada  to 
pseudo-code  compiler. 

2.1  Approach 

As  mentioned  before,  Che  approach  taken  in  this  effort 
was  to  develop  an  Ada  compiler  in  parallel  with  the 
pseudo-machine.  Experience  gained  through  this  approach 
showed  that  the  compiler  actually  drove  the  design  of  the 
machine.  As  each  Ada  construct  was  implemented  in  the 
compiler,  a  set  of  run-time  actions  became  necessary  to 
carry  out  the  required  semantics  of  the  construct.  This  set 
of  actions,  where  feasible,  was  included  as  a  single 
instruction  in  the  machine's  instruction  set.  Where  this 
was  not  practical,  combinations  of  previously  defined 
instructions  were  used  to  implement  the  construct.  In  this 
way,  the  instruction  set  for  the  pseudo-machine  grew 
specially  tailored  to  the  needs  of  the  Ada  language. 
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2.2  Design  considerations 

This  approach  uncovered  two  constructs  that  had  major 
influences  on  the  architecture  of  the  machine.  These 
constructs  included  the  requirement  for  subprograms  to  be 
recursive  and  the  run-time  requirements  imposed  by  the 
tasking  constructs. 

2.2.1  Recursive  subprograms 

When  a  compiler  analyzes  a  subprogram  in  preparation 
for  code  generation,  the  only  information  available  to  it 
concerning  local  variable  and  object  space  requirements  is 
the  space  required  for  a  single  activation  of  that 
subprogram.  Since  subprograms  in  Ada  can  be  activated 
recursively,  the  total  number  of  times  a  procedure  will  be 
called  is  not  known  until  run  time.  Since  the  compiler 
cannot  allocate  variable  and  object  space  for  an  unknown 
number  of  subprogram  activations,  a  run-time  allocation 
scheme  is  required.  This  scheme  must  allocate  memory  space 
for  each  variable  or  object  declared  in  a  subprogram  before 
executing  any  of  that  subprogram's  code.  The  system  used  in 
the  pseudo-machine  is  described  below. 

Ada  subprograms,  like  those  in  other  block-structured 
languages,  obey  a  last-called,  first-completed  calling 
discipline.  That  is,  the  most  recently  called  subprogram 
must  complete  its  execution  before  the  caller  resumes  its 
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execution.  Since  space  for  variables  and  objects  is 
allocated  just  prior  to  the  subprogram's  execution  and 
deallocated  immediately  afterward,  a  stack  can  be  used. 
Consider  the  following  example: 

PROCEDURE  lWN  IS 
A  :  INTEGER; 

BEGIN 
A  :=  2; 

PUT_LINE  (A) ; 

END  MAIN; 

Figure  2-1 :  Run-Time  Space  Allocation  Example 

In  this  example,  procedure  'MAIN'  merely  initializes 
the  local  variable  'A',  prints  it  and  terminates.  The 
run-time  actions  necessary  to  accomplish  this  in  the 
pseudo-machine  are: 

1.  Allocate  stack  space  for  the  procedure's  local 
variable  'A' . 

2.  Allocate  temporary  storage  for  the  constant  2. 

3.  Store  this  value  in  the  space  allocated  to 
variable  'A' . 

4.  Print  the  value  of  variable  'A'. 

5.  Deallocate  the  procedure's  stack  space. 

When  stack  space  is  initially  allocated  to  the 
procedure,  as  in  step  one,  additional  space  is  also 
allocated  to  provide  storage  for  control  data  used  by  the 
run-time  system.  The  number  of  words  required  for  control 


PROJECT  DESCRIPTION 


information  is  fixed  and  is  allocated  before  the  procedure's 
local  variable  space.  In  this  paper,  the  first  word 
allocated  to  a  procedure  is  referred  to  as  the  base  of  the 
procedure  activation,  and  the  control  data  is  referred  to  as 
stack-frame  control  data.  The  space  allocated  to 
temporaries,  as  in  step  2,  is  accessed  strictly  as  a  stack, 
and  the  last  word  allocated  for  temporary  storage  is  called 
the  'top  of  stack'  or  'T'  for  short.  This  will  be  discussed 
more  fully  in  a  later  section. 

Collectively,  the  stack- frame  control  data,  the 
variable  and  object  space,  and  the  temporary  workspace,  is 
called  a  procedure  activation  record  or  a  stack  frame.  The 
layout  of  the  stack  frame  for  a  typical  procedure  activation 
is  illustrated  in  figure  2-2.  Please  note  that  the  stack 
grows  downward  here  and  in  all  illustrations  that  will 
follow. 

2.2.2  Tasking 

Before  discussing  the  run-time  requirements  levied  by 
Ada's  tasking  facilities,  a  brief  introduction  to  them  is 
necessary. 
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Figure  2-2:  Procedure  Accivation  Record 

2. 2. 2.1  Ada's  tasking  facility 

Tasks  are  the  Ada  construct  used  to  specify  code  that 
executes  in  parallel  with  the  parent  procedure.  These 
parallel  tasks  may  execute  totally  independently,  or  they 
may  synchronize  occasionally  to  pass  information.  The 
mechanism  these  tasks  use  to  synchronize  and  pass  data  is 
described  in  the  following  paragraphs. 

A  task  that  accepts  calls  from  other  tasks  has  a  set  of 
pre-defined  names  that  it  can  be  called  by.  These  names  are 
called  entries,  and  their  declaration  looks  the  same  as  a 
procedure  declaration.  Figure  2-3  contains  the  declaration 
of  a  task  named  'A'  that  includes  2  such  entries. 

Task  'A'  can  be  called  by  other  tasks  with  the  entry 
names  'A.AI '  or  'A.A2'.  To  call  task  'A',  the  caller 
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TAS  K  A  I S 

ENTRY  A1  (A1 1  :  IN  INTEGER) ; 

ENTRY  A2  (A1 2  ;  OUT  MY_KIND) ; 

END  A; 

Figure  2-3:  Task  Declaration 

executes  a  call  to  the  desired  entry.  Actual  parameters  of 
the  call  must  match  the  declaration's  parameters  in  number 
and  type  as  they  must  in  a  procedure  call  (excluding 
parameters  with  default  values) .  This  entry  call  looks 
identical  a  procedure  call,  and  might  appear  as: 

A.A2  (Z) 

where  Z  must  be  of  type  'MY_KIND' .  The  called  task  accepts 
such  a  call  by  executing  an  accept  statement  for  the  called 
entry.  Continuing  the  example,  such  an  accept  statement 
might  appear  as: 

ACCEPT  A2  (A21  ;  OUT  MY_KIND)  DO 
STATEMENTS 
END  A2; 

Figure  Accept  Statement 

The  region  between  'DO'  and  'END'  in  the  figure  is 
called  the  accept  body,  and,  in  this  region,  the  two  tasks 
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are  synchronized.  During  this  rendezvous,  the  statements 
comprising  the  accept  body  are  executed  while  the  calling 
task  is  suspended  at  the  point  of  call.  After  the 
completion  of  the  accept  body,  both  tasks  continue  their 
parallel  execution.  Now  that  the  mechanism  for 
synchronizing  parallel  tasks  has  been  described,  the  method 
for  passing  data  will  be  discussed. 

Information  may  be  passed  between  communicating  tasks 
in  two  ways;  through  entry  parameters  or  through  global 
variables.  The  preferred  way  to  pass  information  is  by 
referencing  the  entry  parameters.  In  this  technique,  the 
entry  parameter  acts  like  a  local  variable  in  the  accept 
body.  Entry  parameters,  like  procedure  parameters,  can  have 
a  specified  mode  which  can  be  'IN',  'OUT'  or  'IN  OUT'. 
Thus,  information  passes  into  the  called  task  via  an  actual 


parameter  corresponding 

to  an  'IN' 

or  'IN 

OUT' 

formal 

parameter,  and  passes 

out  of  the 

task  via 

an 

actual 

parameter  corresponding 

to  an  'OUT' 

or  'IN 

OUT' 

formal 

parameter.  This  method  is  safe  since  the  two  tasks  have 
rendezvoused  and  are  in  direct  communication  with  each 
other.  The  other  technique  for  passing  information  between 
tasks  is  by  accessing  global  variables.  There  are  no 
guarantees  with  this  technique,  and  the  programmer  must 
implement  control  constructs  and  safeguards.  Let  the  user 
beware  1 
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The  chronology  of  the  calling  interaction  between  tasks 
permits  two  possible  scenarios  (Ref  7:1).  in  the  first 
scenario,  the  calling-task* s  entry  call  precedes  the 
called-task* s  execution  of  an  accept  statement  for  that 
entry.  The  second  scenario  is  the  opposite,  where  the 
called  task  executes  an  accept  statement  for  an  entry  and 
then  the  caller  executes  the  entry  call.  The  required 
run-time  actions  for  each  scenario  are  briefly  discussed 
below. 


Call  precedes  accept ;  If  Che  caller  executes  an  entry 
call  and  finds  Che  called  task  unable  co  accept  the  call,  it 
enters  itself  in  a  wait  queue  associated  with  that  entry. 
Then  ic  records  Che  current  value  of  its  working  registers 
(its  context)  in  its  stack  frame  and  releases  its  processor. 
The  scheduler  then  attempts  to  schedule  the  released 
processor . 

Accept  precedes  call ;  The  Cask  owning  the  entry 
executes  an  accept  statement  and  finds  there  are  no  callers. 
It  Chen  sets  a  flag  notifying  other  communicating  tasks  chat 
it  is  waiting  for  a  call  to  chat  entry,  records  its  context 
and  releases  its  processor.  The  scheduler  then  attempts  to 
schedule  the  released  processor. 

This  brief  introduction  to  Ada's  tasking  facility  will 
now  be  followed  by  a  description  of  the  run-time  operations 
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required  to  implement  these  constructs.  If  more  information 
on  tasking  is  desired,  see  the  Ada  reference  manual  (Ref 
2:9-1  -  9-16). 

2. 2. 2. 2  Run-time  requirements 

In  the  pseudo-machine,  an  Ada  task  executes  as  an 
object  within  a  subprogram's  activation  record.  As  a  result 
of  this,  the  stack  space  assigned  to  the  parent  must  be 
accessible  to  multiple  processors.  This  is  true  because  one 
processor  might  require  access  to  the  variable/object  space 
allocated  to  the  task  object,  while  another  processor  might 
require  access  to  other  areas  of  the  parent's 
variable/object  space. 

The  stack  space  allocated  to  a  task  is  formatted  the 
same  as  that  of  a  procedure,  except  that  the  task  has  a 
pre-established  upper  bound  on  the  amount  of  space  assigned 
to  it.  This  bound  is  determined  by  the  compiler  when  the 
program  is  compiled,  but  can  be  modified  by  a  representation 
specification  for  the  task  (Ref  2  :  13-3).  Now,  consider  an 
example  showing  the  stackspace  allocated  to  a  task  object 
nested  within  its  parent. 

Notice  that  the  nested  task  in  figure  2-5  has  the  same 
structure  as  the  parent  and  is  nested  within  the  parent's 
local  variable  space.  Remember  that  the  space  allocated  to 
the  nested  task  has  definite  limits  that  are  computed  by  the 
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Figure  2-5:  Parent  With  Nested  Task 


compiler  at  compile  time.  If  subprograms  executing  within 
such  a  nested  task  recurse  excessively,  the  space  allocated 
to  the  task  will  be  exhausted  and  execution  must  stop.  The 
program  would  then  have  to  be  recompiled,  this  time 
notifying  the  compiler  that  the  nested  task  needs  more 
space.  A  better,  more  complicated,  solution  would  be  to 
develop  a  run-time  space  allocation  scheme  to  cover  such 
occurences.  However,  space  is  currently  computed  at  compile 
time  only,  and  there  is  no  run-time  space  allocation  scheme. 
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An  earlier  seccion  on  recursive  subprograms  hinced 
strongly  that  the  pseudo-machine  required  a  stack-oriented 
processor,  and  the  previous  section  on  tasking  hinted  at 
multiple  processors.  The  following  section  will  describe 
the  resulting  combinatioi'.  which  comprises  the  system 
architecture . 

2.3  Pseudo-machine  architecture 

The  pseudo-machine  consists  of  multiple,  stack-oriented 
processors  accessing  a  common,  partitioned  memory  through  a 
controller  which  resolves  conflicts.  The  following  diagram 
illustrates  this  architecture. 


Figure  2-6:  System  Architecture 
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single  stack  that  is  shared  among  the  processors,  and  the 
program  memory  contains  the  code  for  a  single  Ada  program. 
The  system  also  has  a  ready  queue  for  tasks  waiting  to  begin 
or  continue  their  execution.  Associated  with  the  ready 
queue  is  a  scheduler  who  assigns  waiting  tasks  to  idle 
processors  until  exhausting  the  supply  of  either  tasks  or 
processors.  It  is  implemented  as  a  procedure  which  is 
called  by  some  of  the  pseudo-machine’s  instructions. 

The  role  of  the  scheduler  can  be  summarized  as  follows. 
When  the  pseudo-machine  begins  executing  an  Ada  program, 
there  is  only  a  single  thread  of  control  for  the  main 
procedure.  If  that  procedure  spawns  tasks,  they  are 
initiated  by  an  ACTIVATE  instruction  that  enters  the  spavmed 
tasks  in  the  ready  queue  and  calls  the  scheduler.  If  these 
tasks  must  suspend  their  execution,  for  example  while 
waiting  for  a  rendezvous,  they  release  their  processor  and 
call  the  scheduler.  The  scheduler  is  also  called  when  a 
task  terminates  its  execution.  Briefly,  the  scheduler  is 
called  when  a  task  is  activated,  blocks  or  terminates. 

Please  note  that  the  structure  illustrated  on  the 
diagram  is  logical  only.  The  actual  physical  structure  of 
the  system  can  be  quite  different  as  long  as  the  logical 
structure  is  preserved.  Each  of  the  'n'  system  processors 
is  stack  oriented,  and  their  operation  will  now  be 
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described . 

Stack  processors  get  their  name  from  the  way  they 
evaluate  arithmetic  expressions.  They  evaluate  expressions 
in  post-fix,  using  a  stack  to  store  operands  and 
intermediate  results.  When  evaluating  such  an  expression,  a 
stack  processor  pushes  each  operand  it  encounters  onto  an 
evaluation  stack  in  its  memory  and  uses  each  operator  it 
encounters  as  an  instruction.  When  executing  an 
instruction,  it  assumes  the  operands  are  already  on  the 
stack  (This  is  true  because  of  the  properties  of  post-fix 
evaluation.),  and  it  removes  the  operands  and  pushes  the 
result  back  onto  the  stack.  Since  the  processor  knows  where 
the  operands  reside,  and  since  it  knows  where  to  put  the 
result,  the  processor  requires  no  addresses  to  execute  such 
an  instruction.  For  example,  the  expression  2*3+9 
becomes  2,  3,  *,  9,  +  in  post-fix,  which  translates  to  PUSH 
2,  PUSH  3,  MULTIPLY,  PUSH  9,  ADD  in  stack  machine 
instructions.  The  result  of  the  expression  now  resides  on 
top  of  the  stack  and  is  available  for  assignment  to  a 
variable,  comparison  with  other  values  or  for  whatever  use 
that  can  be  made  of  an  expression's  result. 

When  a  stack  machine  is  used  to  implement  a  block 
structured  language,  such  as  Ada,  another  stack-like  feature 
exists.  Since  procedure  activations  obey  a  last-in. 
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firsc-ouc  (LIFO)  discipline,  stack  space  is  allocated  to 
them  in  a  LIFO  manner.  These  space  allocations  and 
deallocations  are  strictly  stack-like,  but  within  the  space 
of  each  allocation,  words  are  accessed  in  a  controlled  but 
hardly  stack- like  manner.  Values  may  be  removed  from  the 
evaluation  stack  and  transferred  into  the  local  variable 
space,  or  removed  from  the  local  variable  space  and  placed 
on  the  stack  or  even  stored  within  another  procedure's 
activation  record.  Additionally,  control  data  can  be 
accessed  or  changed  at  random. 

The  stack  processors  in  this  project  contain  registers 
to  facilitate  access  to  the  data.  These  registers  match 
closely  with  the  boundaries  between  the  previously  described 
blocks  of  data  contained  in  a  procedure  activation.  To 
describe  these  registers  in  a  specific  context,  consider  the 
tfsk  activation  in  figure  2-7. 

The  first  word  of  the  activation  record  is  marked  by  a 
'BASE'  register  and  the  top  of  the  evaluation  stack  is 
marked  by  a  'T'  register.  Remember  that  the  evaluation 
stack  grows  downward  toward  the  high  boundary  on  the 
diagram.  The  task's  high  boundary  is  initially  marked  by 
the  'HEAP'  register.  However,  the  'HEAP'  register's  primary 
purpose  is  not  just  to  mark  the  initial  high  boundary  of  the 
task's  stack  space.  Notice  that  the  'HEAP'  register  on  the 
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Figure  2-7:  Correspondence  of  Registers  and  Blocks 
illustration  has  already  moved  away  from  the  high  boundary. 

The  primary  purpose  of  the  'HEAP'  register  is  to  mark 
the  top  of  the  dynamic  heap.  The  dynamic  heap  provides 
storage  space  for  program  variables  created  at  run  time, 
like  those  created  dynamically  by  the  'NEW'  operator  in 
PASCAL.  As  these  variables  are  created,  space  is  allocated 
to  them  from  this  heap  structure.  On  the  previous  diagram, 
the  heap  grows  upward  toward  the  stack. 

Note  that  the  boundary  between  the  control  data  and  the 
task's  local  variables/objects  is  not  marked  by  a  special 
register.  The  reason  for  this  is  that  control  data  is  of 
known  length  at  compile  time,  and  therefore,  the  offset  to 
the  first  local  variable  can  be  computed. 
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Now  that  some  background  information  on  stack 
processors  has  been  covered,  more  detailed  information  on 
the  project's  pseudo-machine  can  be  presented. 

2.3.1  Memory 

The  memory  contains  two  parts,  the  stack  memory  and  the 
program  memory.  As  mentioned  previously,  any  system 
processor  must  be  able  to  access  any  word  in  stack  memory. 
The  following  section  shows  that  this  is  also  required  of 
the  program  memory. 

2.3.1 .1  Program  memory 

Program  memory  contains  only  the  instructions  to  be 
executed  by  the  processors.  No  variable  space  is  allocated 
within  program  memory,  and  only  read  operations  are 
performed  on  it.  Thus,  an  actual  implementation  could  hold 
any  program  in  a  read-only  memory. 

Multi-tasking  requires  the  program  memory  to  be 
accessible  to  multiple  processors.  This  is  true  because 
Ada's  visibility  rules  permit  procedures  to  be  global  to 
multiple  tasks,  and  therefore,  two  tasks  executing  in 
parallel  could  call  a  single  procedure  at  the  same  time. 
Making  duplicate  copies  of  the  code  is  also  a  possibility, 
but  this  is  less  straight-forward. 
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2. 3. 1.2  Stack  memory 

Stack  memory  contains  space  for  stack-frame  concroL 
data,  program  variables,  temporaries,  and  dynamically 
allocated  variables. 


S tack- frame  control  data:  A  stack  frame  is  allocated 


upon  entrance 

to 

a  block. 

to 

a  subprogram 

or  upon 

initialization 

of 

a  nested 

task 

object.  This 

stack  frame 

contains  the  following  information: 


1 .  The  static  link:  The  static  link  records  the 
textual  nesting  level  of  the  program  as  it  was 
originally  written.  It  is  used  for  run-time 
addressing  of  variables  and  objects'; 

2.  Dynamic  link:  The  dynamic  link  marks  the  base  of 
the  calling  procedure's  activation  record.  It  is 
used  to  deallocate  stack  space  upon  completion  of 
the  procedure's  execution. 

3.  Program  counter:  Storage  space  is  provided  for 

the  current  value  of  the  processor's  working 
registers.  This  is  necessary  since  a  task  may 

have  to  give  up  its  processor  at  any  time.  For 
example,  a  higher  priority  task  may  pre-empt  this 
task,  forcing  it  to  release  the  processor.  The 
current  values  of  the  processor's  working 
registers  must  then  be  stored  so  that  the 
interrupted  tas'K  can  resume  its  execution  at  a 
later  time.  The  'program  counter'  slot  is  used 
to  store  the  current  value  of  the  'PC'  register 
should  this  occur. 

4.  Task  flag:  The  task  flag  is  a  Boolean  variable 

that  indicates  whether  or  not  the  stack  frame  is 
a  task.  It  is  used  to  indicate  task  boundaries 
when  processing  run-time  exceptions  raised  in  the 
program . 

5.  Active  nested  task  counter:  The  active  nested 

task  counter  is  used  to  record  the  number  of 
nested  tasks  currently  active  in  the  given  stack 
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frame.  The  definition  of  the  Ada  language  states 
that  a  block  cannot  be  exited  until  all  nested 
casks  have  completed  cneir  execution  (Ref  2 
9-5) .  The  counter  is  used  to  enforce  this  rule 
at  ru..  time. 

6.  Waiting  flag:  The  waiting  flag  is  a  Boolean 

variable  that  indicates  whether  or  not  the  parent 
Cask  is  waiting  to  terminate  its  execution.  For 
example,  if  the  parent  reaches  the  end  of  its 
code,  and  it  still  has  active  nested  casks,  it 
must  wait  for  them  to  complete.  It  then  sets  the 
waiting  flag  to  true,  scores  the  current  values 
of  its  processor's  working  registers,  and 

releases  its  processor. 

7.  Exceptions;  Ada  allows  controlled  error 

processing  at  run  time  through  its  exception 
facility.  This  control  word  is  currently  not 
used  since  exceptions  are  not  implemented.  When 
exceptions  are  implemented,  the  word  will  be  used 
Co  record  information  on  exceptions  handled 
within  the  block.  More  control  words  will  be 
required  to  accomplish  this. 

8.  Priority.  This  word  is  a  run  time  record  of  the 
cask's  priority. 

9.  Top  of  stack:  The  top-of-stack  control  ;.'ord 

provides  temporary  storage  for  the  processor's 
'T'  register. 

10.  Base:  The  base  control  word  provides  temporary 

storage  for  the  processor's  'BASE'  register. 

11.  Link:  When  a  Cask  is  entered  into  a  queue,  Che 

link  control  word  points  to  the  next  cask  waiting 
in  the  queue.  A  single  link  field  is  sufficient 
since  it  is  a  characteristic  of  the  language  that 
a  cask  can  be  waiting  in  only  one  queue  (Ref  7  : 

11-44)  . 

12.  Heap;  The  heap  position  provides  temporary 
storage  for  the  processor's  'HEAP'  register. 

13.  Data  lock:  This  Boolean  variable  indicates 
whether  or  not  the  cask  frame  is  currently  being 
accessed  by  another  task.  It  is  used  to  limit 
access  to  the  stack  frame  control  data  to  a 
single  processor  at  a  time.  This  word  is 
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currently  not  accessed  by  any  of  the 
pseudo-machine  instructions.  This  deficiency 
needs  to  be  addressed. 

14.  Caller:  When  a  called  task  executes  an  accept 

statement  for  a  particular  entry,  a  pointer  to 
the  base  of  the  accepted  caller  is  stored  in  this 
slot.  This  facilitates  accessing  the  caller's 
top  of  stack  to  retrieve  actual  parameters  during 
an  entry  call  and  also  facilitates  restarting  the 
task  upon  completion  of  an  accept  body. 

15.  Return;  This  control  word  is  used  to  record  the 
return  value  of  the  program  counter  during  a 
procedure  call. 

16.  Entry:  This  word  records  the  number  of  entries 
declared  in  the  current  activation,  and  is  used 
to  compute  the  amount  of  space  required  for  entry 
frame  control  data.  The  instructions  that  use 
this  control  word  assume  that  the  entry  frames 
are  allocated  immediately  following  the  'entry' 
control  word.  See  paragraph  2. 4. 3.1  for  an 
explanation  of  the  structure  and  operation  of  the 
entry  frame. 


Program  variables :  The  compiler  allocates  space  for 
variables  and  objects  after  allocating  space  for  the  stack 
frame  control  data.  Since  the  stack  frame  requires  16 
words,  the  first  word  available  for  a  local  variable  or 
object  is  the  17th  word  on  the  stack,  if  there  are  no  task 
entries  declared. 


Temporaries :  Temporaries  are  allocated  as  required 

during  the  evaluation  of  an  expression.  For  example: 

A  A  +  A 


could  translate  to; 
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LOAD  A  —  The  value  of  A  is  pushed  on  Che  stack 
--  thus  allocating  the  first  temporary. 

LOAD  A  --  The  value  of  A  is  pushed,  now  2  temporaries 
--  are  allocated. 

ADD  —  The  two  operands  are  popped  and  the  value 

--  of  A  +  A  is  pushed.  Now,  only  1  temporary 
--  is  in  use. 

STORE  A  --  The  stack  is  popped,  and  Che  value  is  stored 
—  at  Che  address  for  A.  Now,  no  temporaries 
--  are  in  use. 


LOAD,  ADD  and  STORE  are  descriptive  mneumonics  and  have 
the  meaning  described  in  their  associated  comments. 


2.3.2  Stack  processors 

Each  processor  has  5  working  registers:  a  program 
counter  (PC),  an  instruction  register  (IR) ,  a  base  register 
(BASE) ,  a  top  of  stack  register  (T) ,  a  heap  pointer  (HEAP) 
and  a  status  register  (STATUS). 

1 .  ^  The  program  counter  is  a  pointer  to  words  in 
the  program  memory.  It  indicates  the  next 
instruction  that  the  processor  will  execute. 

2.  BASE  The  base  register  is  a  pointer  to  words  in 

the  stack  memory.  It  indicates  Che  first  memory 
word  of  the  stack  frame  of  the  currently 

executing  subprogram  or  task. 

3.  ^  The  instruction  register  contains  the 
instruction  that  the  processor  is  currently 
executing . 

4.  HEAP  The  heap  register  is  a  pointer  to  words  in 
the  stack  memory.  It  indicates  the  top  of  the 
dynamically  allocated  memory  space. 

5.  T  The  top  of  stack  register  is  a  pointer  to  words 
in  the  stack  memory.  It  indicates  the  top  of  the 
stack  space  of  Che  currently  executing  subprogram 
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•  or  caskc. 

6.  STATUS :  The  status  register  contains  a  bit  that 
indicates  whether  or  not  the  processor  is  busy  or 
idle,  and  a  field  chat  points  into  the  stack 
memory,  called  CURRENTJOB.  This  field  must  be 
the  same  size  as  Che  processor's  other  working 
registers,  since  it  indicates  the  base  of  the 
currently  executing  cask.  The  interpreter  program 
requires  an  additional  piece  of  information  for 
multiple  processor  simulation,  and  this  is  also 
contained  in  the  status  register.  This 

information  is  used  to  limit  the  number  of 
instructions  executed  by  a  processor  before  it 
returns  control  to  the  supervisor.  The 
supervisor  Chen  selects  the  next  processor  whose 
status  is  'BUSY'  and  allows  it  to  work  on  its 
assigned  task.  Thus,  the  supervisor  serves  to 
timeslice  the  actual  processor  among  the 
simulated  processors.  For  more  information,  see 
the  code  listing  for  the  interpreter  in  appendix 
IV. 


The  following  figure  illustrates  the  configuration  of  a 
stack  processor  working  on  a  task. 

Note  chat  the  BASE,  T  and  HEAP  registers  point  into  the 
stack  space  and  indicate  the  first  word  in  the  stack  frame, 
the  top  of  the  evaluation  stack  and  Che  top  of  the 
dynamically  allocated  variable  space,  respectively.  The 
instruction  register  holds  the  instruction  chat  is  currently 
executing,  and  the  program  counter  points  to  the  next 
instruction  that  will  be  executed.  Finally,  the  STATUS 
register  contains  information  necessary  for 

multi-processing,  and  also  points  to  the  base  of  the  cask. 
Note  that  this  diagram  illustrates  a  cask  chat  has  not 
called  a  subprogram,  since  the  BASE  register  is  equal  to  the 
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Figure  2-8:  Sample  Task  Frame 

base  of  the  task  object,  marked  by  the  CURRENTJOB  register. 
If  the  task  had  called  a  single  subprogram,  the  base 
register  would  point  to  the  first  word  in  the  unused  stack 
space  (the  first  word  of  the  new  procedure  activation), 
while  CURRENTJOB  would  retain  its  position  marking  the  base 
of  the  task. 

Now  that  the  architecture  of  the  pseudo-machine  has 
been  discussed,  the  instruction  set  of  the  machine  will  be 
presented . 
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2.4  Pseudo-machine  instruction  set 

The  instruction  set  currently  contains  operations  tnat 
are  specifically  tailored  to  a  subset  of  the  Ada  Language. 
The  subset  is  described  in  the  user's  guide  in  appendix  Hi. 
The  currently  implemented  instructions  can  be  divided  into  5 
classifications;  relational  operators,  integer  or  single 
word  arithmetic  operators,  tasking  operators,  1/0  operators 
and  miscellaneous  operators.  First,  the  instruction  format 
will  be  described. 

Each  instruction  contains  three  fields  of  information; 
the  operation  code  field,  the  level  field  and  the  addT.-ess 
field.  The  operation  code  field  contains  the  name  of  the 
specific  operation  to  be  performed,  and  the  level  and 
address  fields  provide  data  necessary  to  perform  that 
operation.  If  the  level  and  address  fields  are  not 
sufficient  to  contain  the  data  required  by  the  named 
operation,  additional  data  words  may  follow  that 
instruction.  The  following  discussion  of  the  operators  does 
not  specify  the  fields  where  such  data  is  stored,  but  only 
lists  the  additional  data  required.  Additional  details  may 
be  obtained  by  reading  the  interpreter  source  listing  in 
appendix  IV. 
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2.4.2  Integer  (single  word)  arithmetic  operations 

This  classification  contains  single-word  loads  and 
stores,  the  binary  operations,  +,  /,  *  and  MOD,  and  the 

unary  operator  NEGATE. 

2. 4. 2.1  Single  word  loads  and  stores 

Operators  exist  for  loading  and  storing  variables  and 
for  loading  constants. 

Sin;>le-word  loads  and  stores ;  The  additional  data 
required  for  load  and  store  operations  is  the  location  of 
the  variable  whose  value  is  to  be  loaded  or  the  destination 
of  the  variable  whose  value  is  to  be  stored.  As  previously 
stated,  the  compiler  cannot  generate  a  'hard'  run-time 
address  for  a  variable  at  compile  time.  However,  since  the 
storage  space  required  by  a  single  activation  of  a  procedure 
is  known,  variables  can  be  assigned  locations  relative  to 
the  beginning  of  the  procedure's  stack  frame.  Thus,  at  run 
time,  a  variable  can  be  specified  by  providing  its  offset 
from  the  base.  However,  there  is  one  complication. 

Ada's  visibility  rules,  as  those  of  most  other  block 
structured  languages,  allow  variables  stored  in  other 
procedure  activations  to  be  accessed  by  the  active 
subprogram.  Thus,  it  is  also  necessary  to  specify  which 
"base"  the  offset  is  relative  to.  The  compiler  provides 
this  information  as  additional  data  with  the  instruction. 
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The  sin^-Ie  word  loads  and  scores  include  che  operacors 
ILOAD  and  ISTORE.  The  operacor  ILOAD  uses  Che  additional 
data  provided  wich  che  insCrucCion  co  recrieve  a  variable 
from  che  variable  sCorage  area.  Then  ic  pushes  che  value  on 
Che  evaluacion  scack.  The  operacion  ISTORE  pops  che  scack 
and  scores  che  value  in  che  locacion  specified  by  che 
additional  data. 

Loading  cons  Cants :  ILOADCONST  is  the  operacor  for 
loading  a  constant  value  onto  the  evaluacion  scack.  The 
additional  data  required  by  ILOADCONST  is  che  value  of  che 
conscanc  Co  be  loaded.  ILOADCONST  cakes  the  specified  value 
and  pushes  ic  on  che  stack. 

2. 4. 2. 2  Arithmetic  operators 

The  binary  arithmetic  operators  +  (lADD) ,  -  (ISUB),  / 
(IDIV) ,  *  (IMULT) ,  IMOD,  and  IREM  assume  that  their  operands 
reside  on  cop  of  che  stack.  These  operacors  all  worK 
similarly  by  removing  two  operands,  applying  che  operation 
and  pushing  Che  result.  The  unary  arithmetic  operacor, 
INEGATE,  pops  Che  stack  and  pushes  che  integer  wich  che 
opposite  sign. 
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2.4.3  Tasking  operators 

The  tasking  operators  include  ACTIVATE,  CALLENTRY, 
ACCEPT.  RELEASE,  TERMINATE,  ENTILOAD  and  ENTISTORE.  Before 
considering  the  operation  of  these,  a  brief  review  of  Ada's 
tasking  facility  might  be  desired.  See  section  2. 2. 2.1. 

The  additional  data  provided  with  these  instructions  is 
computed  by  the  compiler  at  compile  time.  When  compiling  a 
task,  the  compiler  computes  the  space  required  and  allocates 
it  within  the  local  variable  space  of  the  task's  parent. 
Other  data,  concerning  the  number  of  entries,  priority  and 
initial  values  for  a  task's  HEAP,  BASE,  T,  etc.,  are  also 
computed  and  are  available  as  additional  information  for  the 
tasking  operators. 

2. 4. 3.1  ACTIVATE 

The  parent  task  executes  the  ACTIVATE  instruction  to 
initialize  the  stackframe  of  one  of  its  nested  tasks. 
Additional  information  provided  with  the  instruction 
includes  the  nested  task's  base  pointer,  the  heap  pointer,  a 
pointer  to  the  task's  code,  the  initial  stack  top,  the 
tasx's  priority  and  the  number  of  entries  in  the  task.  The 
base,  heap  and  initial  stack  top  pointers  are  not  absolute 
addresses  but  are  relative  to  the  base  of  the  parent.  The 
parent  uses  this  information  to  compute  absolute  initial 
values  for  each  of  the  processor's  registers.  The  tnitial 
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values  for  the  Cask's  static  and  dynamic  links  are  also  set, 
and  each  entry  declaration  in  the  nested  task  is  allocated 
space  necessary  for  its  control.  This  control  data  for  the 
entry  declaration  is  called  an  entry  frame  in  Che  rest  of 
this  paper.  The  following  paragraph  describes  the  data  it 
contains . 

Three  items  of  infomacion  are  necessary  for  Che 
control  of  an  entry.  The  first  item  is  a  Boolean  variable, 
referred  to  as  the  gate,  which  is  used  to  record  chi  status 
of  the  entry.  If  the  taste  owning  the  entry  is  waiting  to 
execute  an  accept  statement  for  chat  entry,  the  gate  is 
opened;  ocnerwise,  it  is  closed.  The  second  item  is  a 
pointer  to  the  code  which  is  used  to  record  the  location  of 
the  code  of  the  currently  executing  accept  body.  This  is 
used  only  during  the  execution  of  a  select  statement,  which 
has  not  been  implemented  in  the  translator.  Currently,  this 
item  of  information  is  not  referred  to  in  any  of  the 
implemented  instructions.  The  final  control  word  serves  as 
a  queue  head  pointer  for  tasks  calling  the  entry.  The 
pointer  actually  points  to  the  stack  frame  of  the  first  task 
waiting  in  the  queue.  Other  tasks  in  the  queue  are  chained 
together  via  Che  link  field  in  their  stack-frame  control 
data . 


In  addition  to  allocating  and  initializing  the  entry 
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space,  the  parent  initializes  tne  rest  of  the  stack  frame 
and  enters  the  nested  task  in  the  ready  queue.  After  ail 
tasks  nested  within  the  parent  are  initialized,  the 
scheduler  is  called,  and  the  tasks  are  assi^^ned  processors, 
if  available. 

2. 4. 3. 2  CALLENTRY 

The  calling  task  executes  the  CALLENTRY  instruction 
when  it  wishes  to  communicate  with  another  task.  Data 
included  with  the  instruction  includes  the  number  of  entries 
in  the  called  task  and  the  particular  entry  being  called. 
First,  the  caller  finds  the  appropriate  entry  frame  in  the 
called  task's  stack  frame  and  enters  itself  in  the  wait 
queue  for  that  entry.  The  caller  then  checks  the  entry  ^ate 
to  see  if  it  is  open  or  closed. 

If  the  gate  is  open,  the  called  task  has  previously 
executed  an  accept  statement  for  this  entry  and  found  no 
callers  waiting.  (In  response  to  this  situation,  the  called 
task  would  have  opened  the  gate,  stored  its  context  and 
released  its  processor.  See  paragraph  2. 4. 3. 3,  the  ACCEPT 
operator.)  In  the  pseudo-machine,  the  task  owning  the  entry 
executes  the  accept  body,  so  the  calling  task  must  awaken 
the  suspended,  called  task.  It  does  this  by  entering  the 
task  in  the  ready  queue  and  by  calling  the  scheduler.  The 
caller  also  releases  its  processor,  waiting  for  completion 
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of  the  accept  body. 

If  the  gate  is  closed,  Che  called  task  is  not  waiting 
for  a  call  to  chat  entry.  In  this  situation,  the  caller 
merely  adds  itself  to  that  entry  queue,  and  releases  its 
processor . 

2. 4. 3. 3  ACCEPT 

The  called  task  executes  Che  accept  instruction  when  it 
is  ready  to  communicate  with  a  caller.  Additional 
information  necessary  to  execute  an  ACCEPT  statement  is  the 
name  of  the  entry  being  accepted.  First,  the  appropriate 
entry  frame  is  checked  to  see  if  any  casks  are  in  the  queue. 
If  tasks  are  waiting,  the  first  one  is  removed,  and  the 
appropriate  accept  body  is  executed.  If  no  tasks  are 
vjaiting,  Che  called  cask  opens  the  appropriate  entry's  gate, 
stores  its  processor's  context,  releases  its  processor  and 
calls  the  scheduler. 

2.4.3 .4  RELEASE 

The  called  Cask  executes  a  release  instruction  after 
completing  an  accept  body.  RELEASE  restarts  the  parallel 
execution  of  Che  calling  tasK.  by  returning  it  to  the  ready 
queue  and  calling  the  scheduler.  No  additional  information 
is  required  by  RELEASE,  because  a  pointer  to  the  caller  is 
stored  at  a  known  offset  in  the  stack-frame  control  data. 
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2. 4. 3. 5  TERMINATE 

A  nested  task  executes  a  terminate  instruction  at  the 
end  of  its  execution.  First,  the  terminating  task  notifies 
its  parent  that  its  execution  is  complete  and  checks  to  see 
if  the  parent  was  waiting  for  its  termination.  If  so,  the 
nested  task  enters  its  parent  in  the  ready  queue. 

In  either  case,  whether  the  parent  was  waiting  or  not, 
the  nested  task  releases  its  processor  and  calls  the 
scheduler.  No  additional  information  is  required  by 
TERMINATE  since  the  nested  task  can  locate  the  base  of  its 
parent,  and  since  the  parent's  control  data  is  stored  at 
known  offsets  from  its  base.  That  is,  TERMINATE  is  able  to 
locate  all  the  information  it  rieeds  within  the  parent's 
stack  frame. 

2. 4. 3. 6  ENTILOAD 

The  called  task  executes  an  ENTILOAD  instruction  only 
within  an  accept  body  when  referencing  a  entry's  formal 
parameter.  The  actual  parameter  corresponding  to  this 
formal  parameter  is  retrieved  from  the  caller's  stack  and  is 
pushed  on  the  called  task's  stack.  Additional  information 
required  is  the  address  of  the  actual  parameter  with  respect 
to  the  calling  task's  'T'  register. 
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2. 4. 3. 7  ENTISTORE 

The  called  task  executes  an  ENTISTORE  instruction  only 
within  an  accept  body  when  assigning  a  value  to  an  entry's 
formal  parameter.  A  value  is  popped  from  the  called  task's 
stack  and  stored  within  the  calling  task's  stack  frame  at 
the  location  of  the  corresponding  actual  parameter. 
Additional  information  required  is  the  address  of  the  actual 
parameter.  This  address  is  an  offset  with  respect  to  the 
calling  cask's  'T'  register. 

2.4.4  I/O  Operations 

The  input-output  instructions  include  operators  for 
writing  strings  (SPUT)  and  integers  (IPUT)  to  the  output 
file,  and  for  reading  integers  (IGET)  from  the  input  file. 

2. 4. 4.1  SPUT 

Additional  information  required  by  the  operator  SPUT 
includes  a  line-feed  Boolean  that  indicates  whether  or  not  a 
carriage  return  and  a  line  feed  is  to  be  written  on  the 
output  file,  the  number  of  characters  to  print  and  the 
character  data  itself.  SPUT  writes  the  indicated  number  of 
characters  to  the  output  file,  and  then,  if  the  line-feed 
Boolean  is  true,  it  generates  a  carriage  return/ line  feed. 
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2. 4. 4. 2  IPUT 

Additional  information  required  by  the  operator  IPUT  is 
the  line-feed  Boolean.  IPUT  pops  a  word  off  the  stack  and 
writes  the  ASCII  equivalent  of  the  value  to  the  output  file. 
If  the  line- feed  boolean  is  true,  it  generates  a  carriage 
return/ line  feed. 

2. 4. 4. 3  IGET 

IGET  reads  a  string  of  ASCII  digits,  delimited  by  a 
blank,  from  the  input  file,  converts  them  to  an  integer 
value  and  pushes  it  on  the  evaluation  stack.  No  additional 
information  is  required. 

2.4.5  Miscellaneous  Instiructions 

The  miscellaneous  instructions  include  operators  to 
call  a  subprogram  or  function  (CALL),  to  shift  actual 
parameters  in  preparation  for  a  function  call  (PARAMSHIFT) 
and  to  return  from  a  call  (RETURN) .  Other  operators  in  this 
category  include  the  absolute  and  conditional  jumps  (JMP, 
JMPF,  JMPT)  and  an  operator  to  increment  the  T  register 
(INCT)  . 

2. 4. 5.1  CALL 

The  calling  subprogram  executes  a  CALL  instruction  to 
set  up  an  activation  record  for  the  called  subprogram.  The 
instruction  initializes  the  static  and  dynamic  links,  stores 
the  proper  return  address  and  initializes  other  information 
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wichin  Che  stack  frame.  Addicional  information  required  is 
data  to  sec  the  static  Link  and  a  pointer  to  the  code  for 
the  called  subroutine. 

2. 4. 5. 2  PARAMSHIFT 

Addicional  information  required  by  the  PARAiiSHIFT 
operator  is  the  number  of  parameter  words  to  shift  and  the 
shift  distance.  The  calling  subprogram  executes  this 
instruction  only  when  calling  a  procedure  to  allocate  space 
on  its  evaluation  stack  for  the  return  variable.  The  actual 
parameters  are  shifted  upward  on  the  stack  the  number  of 
spaces  indicated  by  the  addicional  information. 

2. 4. 5. 3  RETURN 

The  called  subprogram  executes  a  RETURN  instruction 
after  completing  its  execution.  If  the  called  subprogram 
has  no  active  nested  casks,  it  deallocates  its  stack  space 
by  resetting  the  T  and  Base  registers  and  loads  the  return 
address  into  the  program  counter.  If  nested  tasks  are  still 
active,  the  called  subprogram  cannot  return;  so  it  scores 
its  context,  releases  its  processor  and  calls  the  scheduler. 
No  addicional  information  is  required  to  execute  a  RETURN 
instruction. 
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2. 4. 5. 4  JMP 

Additional  data  provided  with  the  JMP  operator  is  the 
destination  address.  JMP  merely  loads  this  address  into  the 
program  counter  so  that  the  next  instruction  executed  will 
be  the  one  specified  in  the  instruction. 

2. 4. 5. 5  JMPF,  JMPT 

Additional  information  provided  with  the  conditional 
jump  operators  is  the  destination  address.  Both  JMPF  and 
JMPT  pop  a  single  operand  from  the  stack,  and  test  its 
Boolean  value.  If  the  operand  is  false,  JMPF  loads  '".he 
program  counter  with  the  destination  address  so  that  he 
next  instruction  executed  will  be  the  one  specifier  .  .JMPT 
does  just  the  opposite,  transferring  control  only  if  the 
Boolean  value  is  true. 

2. 4. 5. 6  INCT 

Additional  information  provided  with  the  instruction  is 
the  number  of  words  to  increment  the  T  register.  INCT  adds 
the  number  provided  to  the  current  value  of  the  T  register. 

This  completes  the  description  of  the  pseudo-machine's 
instruction  set  and  also  completes  the  description  of  the 
over-all  design  of  the  pseudo-machine.  If  more  detailed 
information  is  desired,  please  refer  to  the  interpreter 
listing  in  appendix  IV.  Now  the  project's  second  major 
product,  the  Ada  test  compiler,  will  be  discussed. 
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2.5  The  compiler 

A  compiler  must  recognize  high  Level  Language 
constructs  and  translate  them  into  equivalent  machine  Level 
instructions.  This  section  first  considers  the  problem  of 
translation  and  then  describes  the  recognizer  used  in  the 
Ada  test  compiler.  Finally,  the  semantic  routines  that 
accomplish  the  translation  are  discussed. 

2.5.1  Background  --  Compilation 

Before  describing  the  project's  test  translator,  a 
brief  introduction  to  the  compilat_on  process  will  be 
presented.  The  emphasis  will  be  on  the  problem  raced  by  the 
translator,  rather  than  on  how  the  translation  is 
specifically  accomplished.  This  problem  will  be  described 
by  postulating  the  existance  of  a  simple  machine  and  a  high 
level  language  and  by  using  these  tools  to  illustrate  the 
compilation  task. 

The  postulated  machine:  The  postulated  machine  is  a 
stack  oriented  machine  that  performs  operations  on  operands 
previously  placed  on  a  stack.  The  machine  described  here  is 
actually  a  subset  of  the  PL/0  machine  described  by  Niklaus 
Wirth  in  his  book  Algorithm ' s  +  Data  Structures  -  Programs 
(Ref  14  :  331-336).  Briefly,  the  machine's  instructions  are 
stored  in  program  memory  and  are  executed  in  sequential 
order  unless  the  order  is  modified  by  an  instruction.  The 
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inscruccion  sec  consists  of  Che  following  7  instructions. 


1 .  LOP  A:  LOD  A  places  the  variable  named  'A'  on  the 
stack . 

2.  LDC  X:  LDC  X  places  Che  value  'X'  scored  in  the 
inscruccion  on  the  stack. 

3.  STO  A:  STO  A  saves  the  variable  named  'A'  in 
memory . 

4.  ADD :  ADD  removes  Dwo  operands  from  the  cop  of  the 
stack  and  adds  them  together.  The  result  is 
pushed  on  the  stack. 

5.  CHECK  <:  CHECK  <  removes  two  operands  from  the 
cop  o?  the  stack.  If  the  second  operand  removed 
is  less  chan  the  first,  then  the  value  TRUE  is 
pushed,  otherwise,  the  value  FALSE  is  pushed. 

6.  Jt-lP  X;  JHP  X  causes  the  machine  to  execute  the 
instruction  at  location  X  next. 

7.  JMPF  X:  JMPF  X  removes  an  operand  from  the  cop  of 
the  stack.  If  its  value  is  FALSE  then  the 
machine  executes  the  inscruccion  at  location  X. 


The  high-level  language :  The  postulated  high-level 

language  consists  of  the  single  sentence; 

IF  <CONDITION>  THEN  <STATEMENT>  ELSE  <STATEMENT> . 


The  three  words  IF,  THEN  and  ELSE  give  this  sentence 
its  structure.  The  word  IF  signals  that  a  conditional 
statement  will  (or  should)  follow,  and  the  words  THEN  and 
ELSE  signal  that  a  statement  follows.  Furthermore,  the 
statement  following  THEN  is  to  be  done  only  if  the 
conditional  statement  is  true,  and  the  statement  following 
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ELSE  is  CO  be  done  only  if  it  is  false. 

The  translation:  The  specific  example  to  be  translated 
CO  hypothetical  machine  code  is: 

IF  A  <  B  THEN  A  :=  A  +  1  ELSE  B  :=  B  +  1  . 

In  this  sentence,  A  and  B  are  variables  that  are  assumed  to 
have  been  initialized  to  some  value,  ' :='  is  an  assignment 
operator,  '+'  is  an  addition  operator  and  '1'  represents  the 
decimal  number  one. 

The  compiler's  translation  problem  is  similar  to  the 
problem  faced  by  a  human  interpreter.  The  interpreter  must 
cake  a  sentence  in  the  source  language  and  create  a  sentence 
with  the  same  meaning  in  the  target  language.  Similarly, 
the  compiler  program  must  translate  the  meaning  of  a 
sentence  written  in  a  high-level  language  to  a  sentence  with 
Che  same  meaning  in  the  machine's  language.  However,  there 
is  a  difference  between  this  translation  problem  and  the 
human  interpreter's  problem.  When  translating  between  human 
languages,  the  interpreter  is  usually  working  with  two 
languages  of  approximately  the  same  expressive  power,  where 
a  sentence  in  one  language  will  become  an  equivalent 
sentence  in  the  ocher  language.  In  contrast,  the  compiler 
is  working  with  two  languages  with  vastly  different 
expressive  powers,  where  a  sentence  in  a  high-level  language 
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may  translate  to  hundreds  of  sentences  in  machine  languaije. 
Thus,  the  compiler's  goal  is  to  provide  a  translation  which 
preserves  the  meaning  of  a  high  level  language  sentence 
given  the  limited  set  of  resources  at  the  machine  level. 


There  are  several  ways  that  a  compiler  can  recognize  a 
high  level  language  construct,  but  these  methods  will  not  be 
discussed  here.  It  is  merely  assumed  that  the  compiler  can 
recognize  one.  Once  the  construct  is  recognized,  the 
associated  meaning  is  known,  and  the  compiler  can  issue 
machine  language  instructions  which  preserve  that  meaning. 
The  sequence  of  code  the  compiler  would  generate  to  preserve 
the  meaning  of  the  statement 

IF  A  <  B  THEN  A  A  +  1  ELSE  B  :=  B  +  1 


is : 


LOD  A 
LOD  B 
CHECK  < 

JMPF,  FALSE_PT 

LOD  A 
LDC  1 
ADD 
STO  A 

JMP  END 
«FALSE_PT» 

LOD  B 
LDC  1 
ADD 
STO  B 


--load  variable  A 

--load  variable  B 

--remove  A  and  B  from  the  stack 

--and  replace  with  the  value  of  A  <  B 

--if  the  value  on  top  of  Che  stack  is 

--false,  Chen  go  to  label  FALSE_PT 

--begin  true  part 

--load  the  constant  value  1 

--pop  the  two  operands  and  push  the  sum 

--store  the  top  of  stack  value  in 

--the  location  assigned  to  variable  A 

--jump  over  the  false  part 

--begin  the  false  part 

--load  the  constant  value  1 

--pop  two  operands  and  push  their  sum 

--store  the  top  of  stack  value  in 

--the  location  assigned  to  variable  B 

--end  of  translation 


«END>> 
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The  reader  should  verify  chat  this  translation  is 
correct.  That  is,  assure  that  the  defined  meaning  of  the 
high  level  language  construct  is  preserved  in  the 
translation  to  machine  instructions.  Now,  with  this  example 
as  background,  the  Ada  to  pseudo-code  translator  developed 
in  the  project  will  be  described.  The  first  topic  to  be 
discussed  is  the  mechanism  that  recognizes  high  level 
language  constructs,  the  LR(1)  parsing  automaton. 

2.5.2  LR(1)  parsing  automaton 

The  LR(1)  parsing  automaton  is  a  bottom-up, 
finite-state  machine  whose  operations  are  directed  by  a  set 
of  language  specific  tables.  For  an  introduction  to  LR(1) 
parsing  see  Appendix  II. 

The  specific  system  used  to  build  the  parser  was  the  LR 
package  from  Lawrence  Livermore  Laboratory  (Refs  12  ;  13). 
This  system  is  written  in  ANSII  standard  FORTRAN  and 
consists  of  an  automatic  parser  generator  and  a  parser 
skeleton.  Since  the  project  was  written  in  PASCAL,  the 
parser  skeleton  had  to  be  translated,  and  the  tabular  data 
output  from  the  automatic  parser  generator  had  to  be 
reformatted.  The  following  paragraphs  describe  the 
construction  of  the  parser,  its  structure  and  its  operation. 
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2. 5. 2.1  Construction 

Construction  of  the  parser  required  inputting  an  LR(1) 
grammar  into  the  automatic  parser  generator,  inserting  the 
resulting  tables  into  the  parser  skeleton,  and  writing  a 
lexical  analyzer  for  Ada. 

The  automatic  parser  generator :  The  automatic  parser 
generator  constructs  the  language  specific  tables  that 
control  the  operation  of  the  automaton.  An  LR(1)  grammar 
for  the  subject  language,  in  this  case  Ada,  is  input  to  the 
generator,  and  a  grammar  analysis  and  a  set  of  tables  are 
produced.  The  grammar  analysis  consists  of  a  sorted  listing 
of  the  vocabulary,  a  formatted  listing  of  the  language 
productions  and  a  human  readable  version  of  the  resulting 
finite-state  control  for  the  parser.  The  set  of  tables  is  a 
machine  readable  version  of  the  finite-state  control  and  is 
in  the  proper  format  for  insertion  into  the  parser  skeleton. 

The  parser  skeleton :  The  parser  skeleton  is  also 
written  in  FORTRAN  66  and  consists  of  a  set  of  routines  that 
interpret  the  tables  generated  by  the  automatic  parser 
generator.  The  package  consisting  of  the  parser  skeleton 
and  the  tables  requires  the  addition  of  a  lexical  analyzer 
to  produce  an  operating  parser.  The  lexical  analyzer 
(scanner)  scans  the  input  file,  isolates  tokens  and  returns 
that  token's  reference  to  the  parser.  Collectively,  the 
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parser  skelecon,  the  tables  and  the  scanner  comprise  the 
core  of  the  compiler  prOj^ram. 

Advantages :  Using  the  LR  system  provides  three  major 
advantages.  First,  the  parser  can  be  constructed  quictcly 
with  the  assurance  that  the  final  results  will  parse  the 
grammar  correctly.  Second,  the  grammar  can  be  changed 
relatively  easily,  if  necessary.  Finally,  the  resulting 
program  is  space  efficient  and  modular.  The  following 
paragraph  describes  the  program's  modular  structure. 

2. 5. 2. 2  Parser  stmcture 

The  following  figure  contains  a  chart  which  describes 
the  structure  of  the  parser  using  a  technique  described  by 
G.  L.  Myers  in  his  book  Composite  Structured  Design  (Ref  11 
;  13).  The  figure  consists  of  a  network  of  modules  arranged 
in  levels,  with  a  module's  position  determined  by  the 
calling  dependencies  between  it  and  the  other  modules.  The 
module  at  the  cop  of  the  diagram  is  named  PARSE.  Module 
PARSE  calls  four  subordinate  modules,  named  FTNDREDUCTION , 
DOKEDUCTION,  FINDTRANSITION ,  and  DOTRANSITION .  When  PARSE 
calls  FINDREDUCTIOH,  it  provides  module  FItIDREDUCTION  with 
information  concerning  the  current  state  and  the  current 
look-ahead  symbol.  Upon  return,  FINDREDUCTION  provides 
PARSE  with  a  production  number.  These  data  flows  are 
indicated  on  the  diagram  by  a  number,  and  the  specific  data 
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1  Current  state  and  token 

2  Production  ,  Stkptr 

3  Current  state  and  token 

4  New  state  ,  Stkptr 

5  Production  if,  Stkptr 

6  Stack[ stkptr] .state, 

Left-hand  side  (production  #) 

7  . 


OUT 

Production  it 

New  state  ,  Stkptr 

New  state  It 

Stkptr,  Current  state  it 
Token  description 


New  state  It 
Token  description 


Figure  2-11:  Parser-Structure  Chart 

passed  is  found  in  the  chart  at  the  bottom  of  the  figure. 
The  remainder  of  the  diagram  may  be  interpreted  in  this  same 
way . 


2. 5. 2. 3  Parser  operation 

The  controlling  module,  PARSE,  repeatedly  executes  a 
series  of  statements  until  it  transitions  to  its  final 
state.  The  following  algorithm  describes  PARSE' s  actions. 

To  begin,  PARSE  calls  FINDREDUCTION  to  see  if  any 
reductions  exist.  If  a  reduction  can  be  done,  module 
DOREDUCTION  is  called,  and  PARSE  goes  back  to  repeat  the 
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REPEAT 

Check  to  see  if  a  reduction  is  possible  while  in  tne 
current  state  with  the  current  look-ahead  token. 

If  reduction  is  possible:  Do  Che  reduction. 

If  reduction  is  not  possible: 

Check  to  see  if  a  transition  is  possible  while  in 

the  current  state  with  the  current  look-ahead  token. 
If  transition  is  possible:  Do  the  transiticn . 

If  transition  is  not  possible:  Syntax  error  ^  t  source. 
UNTIL  current  state  =  final  state. 


Figure  2-12:  Algorithm  for  Module  Parse 

loop.  If  no  reduction  can  be  done,  PAxSE  calls 
FINDTRANSITION  Co  see  if  any  transitions  exist.  If  a 
transition  can  be  done  module  DOTRANSITION  is  called  and 
PARSE  goes  back  to  repeat  the  loop.  If  no  transition  can  be 
done,  PARSE  has  detected  a  syntax  error.  This  sequence 
continues  until  the  parser  transitions  to  the  final  state. 


2.5.3  Semantic  routines 

This  section  traces  the  flow  of  semantic  information 
throughout  the  translation  process.  Semantic  information  is 
initially  collected  by  Che  scanner  and  stored  on  semantic 
stacks.  This  information  may  eventually  be  transferred  to 
the  symbol  table  as  directed  by  the  semantic  routines. 


2. 5. 3.1  Scanner 

scanner's  function  is  to  find  the  next  lexical  item  in 
the  input  file.  After  finding  it,  Che  scanner  also 
associates  a  certain  semantic  meaning  with  chat  token.  For 
example,  an  identifier  is  returned  to  the  parser  as 
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(*identif ier* ,  pointer  to  symbol  table  entry,  ASCII 
representation).  For  parsing  purposes,  the  only  significant 
information  is  that  the  next  token  is  an  *identif ier* .  The 
semantic  routines  use  the  remainder  of  the  information  to 
determine  whether  or  not  tnis  identifier  is  correctly  used 
in  the  particular  context. 

2. 5. 3. 2  Semantic  stacks 

The  parser  maintains  2  parallel  stacks,  one  to  store 
the  next  token  and  another  to  store  the  current  state.  In 
addition  to  these,  various  other  stacks  are  maintained  to 
store  data  associated  with  the  stacked  token.  These  stacks 
are  called  the  semantic  stacks.  For  example,  additional 
semantic  stacks  can  be  used  to  store  a  pointer  to  the 
token's  symbol  table  entry,  to  store  its  ASCII 
representation,  its  integer,  real  or  character  value  or  to 
retain  any  other  information  that  might  be  required  to 
establish  the  token's  meaning.  The  semantic  routines  then 
use  this  information  to  determine  if  the  token  is  proper  for 
the  given  context. 

2. 5. 3. 3  Sample  semantic  routine 

Jhen  DOREDUCTION  calls  SEMANTIC,  it  tells  SEMANTIC 
which  particular  construct  it  has  recognized  in  the  input 
file.  For  example,  assume  that  module  DOREDUCTION  has 
called  SEMfUNTIC  with  production  number  289  .  This  tells  the 
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semantic  module  that  production  number  289  has  been  isolated 
in  the  input  and  that  the  production's  components  have  been 
assembled  on  the  stack.  Suppose  production  number  239  is 
defined  as  follows: 


<PARAMETER_DECLARATION>  : :=  <ID>  ;  <MODE_OPTION> 
<SUBTYPE  INDICATION>  <INITIALI2ATI0N  OPTION> . 


From  this,  the  semantic  module  knows  that  the  items 
composing  a  <PARAtIETER_DECLARATION>  are  on  top  of  the  stack. 
Furthermore,  it  knows  these  items  have  been  assembled  on  the 
stack  by  the  parser  in  the  order  they  were  encountered; 
thus,  the  top  item  is  an  <INITIALIZATION_OPTION> ,  and  the 
other  items  can  be  located  by  their  offset  from  that  item. 
Now,  Che  appropriate  semantic  actions  for  a 
<PARAiMETER_DECLARATION>  can  be  accomplished  using  the  data 
assembled  in  the  semantic  stacks.  Appropriate  semantic 
actions  for  a  <PARAIdETER_DECLARATION>  might  include: 


-  Look  up  the  identifier  (stack  [stkptr  -  4J)  in  the 
symbol  table  and  check  whether  or  not  it  has  been 
previously  declared. 

-  If  it  nas  been  previously  declared,  call  the  error 
routine . 

-  If  it  has  not  been  previously  declared,  add  the 

new  identifier  to  the  symbol  table,  and  store 
semantic  data  associated  with  it.  e.g.  Sec  the 
identifier's  type  to  'parameter',  and  store  the 
parameter's  mode  (stack[ stkptr  -  2]),  subtype 

(stack  [stkptr  -  1])  and  initial  value  (stored  at 
stack  [stkptrj)  in  Che  symbol  cable. 
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After  completing  the  semantic  actions  associated  with 
production  289,  SEMANTIC  returns  control  to  DOREDUCTION. 
DOREDUCTION  then  removes  the  five  items  comprising 
production  289  from  the  stack  and  replaces  them  with  the 
single  item  <PARAMETER_DECLARATION> . 

2.5.4  Symbol  table  and  visibility 

Name  visibility  is  enforced  with  a  compile  time 
environment  stack,  stacking  rules  and  special  symbol-table 
access  routines. 

2. 5. 4.1  Environment  stack 

An  entry  in  the  environment  stack  contains  information 
on  the  name  of  the  environment,  whether  or  not  the 
environment  acts  as  a  package  visible  part,  and  whether  or 
not  the  environment  is  directly  visible.  Initially,  the 
environment  stack  is  empty. 

2. 5. 4. 2  Stacking  rules 

The  stacking  rules  specify  which  names  are  to  be  pushed 
on  the  environment  stack  and  what  values  are  to  be  stored 
with  them.  These  rules  assume  the  existence  of  two 
operations  on  the  environment  stack,  PUSH  arid  POP,  and  of  a 
global  variable  used  to  record  the  lexical  level.  Again, 
the  environment  stack  consists  of  3-tuples  which  contain  the 
environment  name  and  two  Boolean  variables  that  indicate 
whether  or  not  the  environment  acts  like  a  package  visible 
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pare  and  whecher  or  not  Che  environment  represented  by  the 
entry  is  directly  visible. 


PROCEDURE 

entry  :  increment  the  lexical  level; 

PUSH  (procedure  name,  false,  true); 

exit  :  decrement  the  lexical  level; 

POP  until  name  =  procedure  name 
POP 

PACKAGE  VISIBLE  PART 

entry  :  PUSH  (package  name,  true,  true); 

exit  ;  POP  until  name  =  package  name 

REPLACE  (package  name,  true,  false) 

PACKAGE  BODY 

entry  ;  PUSH  (package  name,  true,  true) 

exit  ;  POP  until  name  =  package  name 
POP 

TASK  VISIBLE  PART 

entry  :  PUSH  (Cask  name,  true,  true) 
exit  :  REPLACE  (task  name,  true,  false) 
TASK  BODY 

entry  :  increment  the  lexical  level 

PUSH  (task  name,  false,  true) 

exit  :  decrement  the  lexical  level 
POP  until  name  =  task  name 
POP 

ACCEPT  BODY 

entry  :  PUSH  (entry  name,  true,  true) 
exit  :  POP 


Figure  2-13:  Stacking  Rules 
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2. 5. 4. 3  Symbol-table  routines 

Ada's  visibility  rules  are  supported  by  routines  to 
enter  a  symbol,  to  find  a  symbol  in  a  named  environment  and 
to  find  a  symbol  in  scope. 

Entering  a  symbol 

Symbols  are  entered  in  the  symbol  table  tagged  with  the 
environment  in  which  the>  are  declared.  This  environment  is 
specified  by  a  2- tuple  consisting  of  the  lexical  level  and  a 
linked  list  of  the  environment  names  on  the  stack  when  the 
entry  is  made. 

Lexical  Level :  The  lexical  level  records  the  number  of 
static  links  that  must  be  traversed  to  reach  the  main  or 
outermost  textual  level.  This  value  is  initialized  to  0  and 
altered  only  according  to  the  stacking  rules. 

Linked  list :  The  linked  list  contains  all  the  directly 
visible  names  stored  on  the  environment  stack  at  the  time 
the  symbol  was  entered.  Since  the  environment  stack  is 
altered  only  according  to  the  stacking  rules,  the  list  will 
contain  only  subprogram,  package,  task  or  entry  names. 
Finding  a  symbol  in  a  named  environment 

The  caller  provides  the  symbol's  lexical  level  and  the 
specific  environment  to  be  searched.  The  routine  searches 
this  environment  and  returns  a  reference  to  the  symbol  if  it 
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axis  Cs . 

Finding  a  symbol  in  scope 

The  caller  provides  che  current  lexical  level  and 
environment.  The  routine  successively  searches  nested  scopes 
until  the  symbol  is  found  or  there  are  no  more  environments 
to  search.  It  returns  a  reference  to  the  symbol  if  it 
exis  ts . 


2. 5. 4. 4  Visibility  example 

These  tools  comprise  a  system  which  supports  Ada's 
visibility  rules.  The  following  example  illustrates  their 
use . 


Q> 

CI> 

PROCEDURE  MAIN  IS 

* 

A  :  INTEGER; 

□> 

PACKAGE  MAIN  1  IS 

* 

B> 

A  :  INTEGER; 

END  MAIN_1 ; 

'k 

E> 

PACKAGE  BODY  MAIN  1  IS 

k 

(S> 

M  1 B  :  INTEGER; 

BEGIN 

A  :=  1  ; 

MAIN. A  ;=  2; 

_  END  I^IN  1  ;  * 

Q> 

BEGIN  --  MAIN 
I3>  MAIN_1  .A  ;=  A; 

END  MAIN;  * 

[2> 

Figure  2-14:  Example  Program  for  Visibility  Demonstration 


Each  number  on  the  figure  points  to  a  region  of  the 
text  where  the  environment  is  of  interest,  and  the  asterisk 
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marks  the  application  of  one  of  the  stacking  rules.  For 
each  number,  figure  2-15  illustrates  the  contents  of  the 
environment  stack  and  all  the  variables  entered  in  the 
symbol  table  up  to  that  point  in  the  source  text.  The 
example  begins  at  point  one,  with  a  NIL  environment  and  no 
variables  in  the  symbol  table.  Each  new  identifier 
encountered  in  the  text  is  entered  in  the  current 
environment,  and  the  environment  stack  is  changed  only  at 
the  marked  points  using  the  previously-defined  stacking 
rules . 


This  concludes  the  description  of  the  thesis  project. 
Additional  detailed  information  on  the  operation  of  either 
the  pseudo-machine  or  the  compiler  can  be  obtained  by 
studying  the  PASCAL  source  listing  for  the  system.  Appendix 
IV  contains  the  listing  of  the  interpreter  program,  but  due 
to  the  size  of  the  compiler  listing,  it  has  not  been 
included.  However,  copies  of  the  entire  listing  are 
available  in  machine  readable  form  on  the  ARPA  net.  Contact 
the  AFIT/EN  Mathematics  Department  for  further  information. 
The  following  chapter  will  describe  recommendations  for 
follow-on  efforts. 
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CONTENTS  OF 

ENVIRONMENT  STACK  VARIABLES  ENTERED 


ENV  NAME 

PACKAGE 

DIRECT  VIS 

VAR  NAME 

ENVIRONMENT 

CI> 

NIL 

NIL 

NIL 

NIL 

NIL 

E> 

MAIN 

FALSE 

TRUE 

MAIN 

0 

<NIL> 

MAIN 

FALSE 

TRUE 

MAIN 

0 

<NIL> 

A 

1 

<MAIN> 

E> 

MAIN 

FALSE 

TRUE 

MAIN 

0 

<NIL> 

MAIN_1 

TRUE 

TRUE 

A 

1 

<MAIN> 

MAIN  1 

1 

<MAIN,MUN 

1> 

A 

1 

<MAIN,:'1AIN_ 

1  > 

CI> 

MAIN 

FALSE 

TRUE 

SAME 

AS 

ABOVE 

MAIN_1 

TRUE 

FALSE 

2> 

MAIN 

FALSE 

TRUE 

MAIN 

0 

<NIL> 

MAIN  1 

TRUE 

FALSE 

A 

1 

<MAIN> 

MAIN_1 

TRUE 

TRUE 

MAIN  1 

1 

<MAIN> 

A 

1 

<MAIN,  MAIN 

1> 

M_1  B 

1 

<MAIN,  MAIN 

J  > 

G> 

I'lAIN 

FALSE 

TRUE 

SAME 

AS 

ABOVE 

MAIN_1 

TRUE 

FALSE 

Cl> 

MAIN 

FALSE 

TRUE 

SAME 

AS 

ABOVE 

MAIN_1 

TRUE 

FALSE 

C2> 

NIL 

NIL 

NIL 

NIL 

NIL 

Figure  2-15:  Visibility  Rules  Demonstration 
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3.  Reconunendations 

As  time  for  the  project  work,  drew  to  a  close,  it  became 
apparent  that  several  items  on  the  'do-list'  would  not  ^^et 
done.  This  chapter  describes  these  deficiencies  and  also 
describes  some  areas  where  continuation  efforts  could  begin. 
Since  the  project  is  composed  of  two  major  parts,  the 
pseudo-machine  and  the  test  compiler,  the  recommendations 
are  divided  to  reflect  this.  The  first  section  in  the 
chapter  describes  suggested  improvements  to  the 
pseudo-machine,  and  the  last  section  describes  suggested 
improvements  to  the  test  compiler. 

3.1  Improvements  to  the  pseudo-machine 

Known  areas  where  the  pseudo-machine  can  be  improved  or 
expanded  include:  providing  run-time  space  allocation  for 
tasks,  improving  the  system  queues,  improving  the  allocation 
of  stack-frame  control  data,  implementing  exceptions, 
implementing  the  dynaraic-variable-space-access  routines, 
investigating  the  effects  of  Ada's  enumeration  I/O 
requirements  and  implementing  mechanisms  to  protect  data 
subject  to  access  by  multiple  processors. 

3.1.1  Run-time  space  allocation 

The  current  implementation  computes  a  task's  space 
requirements  at  compile  time.  Thus,  if  a  task  calls 
procedures  that  recurs*  excessively,  the  precomputed  space 
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may  become  exhausted.  If  this  is  unacceptable  for  a 
particular  implementation,  consideration  should  be  given  to 
a  run-time  space  allocation  scheme. 

3.1.2  System  queues 

The  ready  and  entry  queues  in  the  system  are 
implemented  as  linked  lists  with  a  pointer  to  the  head  of 
each  list.  Therefore,  adding  a  task  to  a  queue  requires 
traversing  the  entire  list  to  find  the  list's  end. 
Possibly,  the  queues  could  be  speeded  up  by  adding  a  queue 
tail  pointer,  but  the  average  queue  length  could  be  so  short 
that  this  would  not  be  much  of  an  improvement. 

3.1.3  Stack-frame  control  data 

The  current  implementation  uses  the  same  stack- frame 
control  data  for  tasks  as  it  does  for  subprogram 
activations.  This  results  in  several  unused  words  in  the 
control  data  allocated  to  a  subprogram.  Some  space  could  be 
saved  by  defining  a  new  stack  frame  specifically  for  use  in 
a  subprogram  call. 

3.1.4  Implementing  exceptions 

Exceptions  declared  in  a  block  or  subprogram  must  be 
allocated  space  for  control  information.  Data,  such  as  the 
names  of  the  exceptions  handled  within  the  block  and  the 
location  of  the  handler's  code,  must  be  available  at  fixed 
or  computable  offsets  from  the  BASE  register.  An 
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inscruccion  to  carry  out  the  run-time  actions  of  raisin;^  an 
exception  must  also  be  written. 

3.1.5  Implementing  dynamic  variables 

No  constructs  that  required  dynamically  allocated  heap 
space  were  implemented.  However,  when  they  are,  run-time 
actions  that  will  be  required  will  include  instructions  to 
load  dynamic  variables  onto  the  evaluation  stack,  to  store 
the  top  of  stack  within  the  dynamic  variable  space,  and  to 
locate  and  manipulate  data  within  dynamically  created  task 
objects.  Once  methods  for  allocating,  loading  and  storing 
dynamic  variables  and  tasks  have  been  implemented, 
consideration  should  be  given  to  deallocation  and  garbage 
collection.  However,  a  minimal  system  should  not  require 
this . 


3.1.6  Enumeration  I/O 

Ada's  enumeration  I/O  facilities  may  require  the 
addition  of  another  data  block  to  the  stack  frame  and  the 
addition  of  another  register  w'  which  to  access  it.  This 
area  may  be  necessary  tc  he  ASCII  representation  of 
enumeration  types  declared  within  the  associated  scope. 
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3.1.7  Data  protection 

The  data- Lock  control  word  was  added  to  the  control 
data  so  that  access  to  a  task's  stack  frame  could  be  limited 
to  a  single  processor  at  a  time.  However,  since  the 
pseudo-machine  architecture  was  simulated  on  a  single 
processor,  a  mechanism  for  checking  and  setting  the  data 
lock  was  never  implemented.  Currently,  none  of  the 
implemented  instructions  check  this  word,  although  several 
of  them  should.  In  addition  to  protecting  data  contained  in 
a  task,  the  system's  ready  queue  must  be  similarly 
protected.  This  entire  matter  requires  careful 
consideration. 

3.2  Improvements  to  the  compiler 

Improvements  to  the  test  compiler  must  be  based  on  its 
intended  use.  This  section  considers  two  possible  uses  of 
the  test  compiler:  first,  as  a  basis  for  building  a  finished 
compiler  and,  finally,  as  a  tool  in  the  development  of  a 
production  Ada  to  pseudo-code  compiler. 

3.2.1  Towards  a  finished  product 

Several  compilation  tasks  were  side  stepped  in  this 
project  because  of  time  restrictions.  Four  of  these  areas 
include  representation  specifications,  types,  overloading 
and  separate  compilation.  Representation  specifications 
specify  how  types  in  the  language  are  to  be  mapped  onto  the 
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underlying  machine  (Ref  2  :  13-1).  This  issue  was  not 
inves Cigaced .  Implemencacion  of  types  was  limited  to 
integers,  only.  The  addition  of  user  defined  types  will 
greatly  increase  the  power  of  Che  compiler  and  should  not  be 
overly  difficult.  However,  implementing  subtypes  and 
derived  types  could  be  more  sporting.  Overloading  and 
separate  compilation  are  two  interesting  and  probably  very 
challenging  areas  chat  will  likely  have  a  significant  impact 
on  Che  structure  of  Che  test  compiler's  symbol  table. 
Separate  compilation  will  have  an  additional  impact  on  its 
code  generation  routines  and  will  probably  require  a 
comprehensive  linker  program. 


As  Che  compiler  moves  closer  to  completion,  more 
thought  should  be  given  to  improving  the  error  tolerance  of 
the  semantic  routines  and  to  polishing  the  grammar. 
Currently,  the  compiler  checks  for  syntactic  and  semantic 
errors  until  the  first  error  is  encountered.  From  chat 
point  onward,  only  syntactic  errors  are  checked.  More  error 
tolerant  semantic  routines  would  allow  continued  analysis  of 
semantics  after  an  initial  error.  The  LR(1)  grammar  used  in 
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in  execuCion  speed  and  in  minor  decreases  in  memory  space 
requirements . 

The  following  deficiencies  in  Che  current  compiler  have 
been  noted. 


Accept  statements;  Accept  statements  for  an  entry 
of  a  given  cask,  may  only  appear  within  the 
sequence  of  statements  of  the  corresponding  task 
body  (Ref  2  :  9-7).  The  compiler  does  not  check 
for  this  restriction. 

Package  body  variables:  Variables  declared  in  a 
package  body  should  not  be  accessible  outside  Che 
package.  The  compiler  dees  not  limit  such  access. 

Initialization  of  variables:  The  compiler  does 
not  handle  initialization  of  variables. 

Testing;  The  compiler  program  has  not  received 
adequate  testing  because  of  time  limitations,  and 
some  of  Che  implemented  constructs  have  not  been 
tested  at  all.  Be  assured  that  there  are  errors 
to  be  found. 


3,2.2  For  use  as  a  tool 

With  minor  improvements,  the  existing  test  compiler  and 
pseudo_machine  could  be  used  as  a  tool  to  begin  the 
development  of  a  production-quality  Ada  Co  pseudo-code 
translator.  The  major  improvement  necessary  to  make  the 
test-compiler  useful  for  this  purpose  is  the  implementation 
of  the  basic  structured  types.  In  this  category,  records 
and  one  dimensional  arrays  are  almost  necessities. 
Additional  constructs  that  should  be  added  are  enumeration 
and  access  types.  With  these  additions,  sufficient  power 
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should  be  available  to  write  the  new  compiler  in  Ada  without 
overly  limicinj^  one's  expression. 

When  writing  the  production  compiler,  the  programmer 
must  deal  with  the  limitations  of  the  host  processor.  For 
example,  if  the  compiler  is  to  run  on  a  small  machine,  it 
must  be  designed  with  this  in  mind.  This  means  that  space 
saving  techniques  such  as  segmentation  and  multiple-pass 
compiler  design  would  probably  have  to  be  employed. 

This  completes  the  Recommendations  chapter  and  also  the 
main  body  of  the  thesis.  Pursuing  this  project  has  added  a 
staunch  supporter  to  the  growing  ranks  of  Ada  enthusiasts, 
and  I  feel  that  Ada  is  something  that  has  been  needed  for  a 
long  time.  More  power  to  her! 
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1  APPENDICES 

These  appendices  provide  additional  detailed 
information  on  several  topics.  Included  in  them  are  a 
summary  of  an  early  study  on  the  economics  of  commonality, 
background  information  on  LR(1)  parsing,  a  user's  guide  and 
the  PASCAL  source  listing  of  the  interpreter  program. 
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I.  DOD  Commonality  study 

In  July  1977,  DARPA  tasked  Decisions  and  Designs 
Incorporated  (DDI)  to  perform  a  two  part  effort:  first,  to 
modify  decision  analytic  models  to  predict  the  impact  of  a 
common  DOD  high  order  language,  and  second,  to  implement  and 
run  the  models  (Ref  5  :  1 ) . 

Decision  Analytic  models : 

Three  models  were  used  to  accomplish  this  task:  EVAL, 

which  compared  14  attributes  of  the  input  languages,  SPREAD, 
which  generates  predictive  scenarios  given  data  inputs  from 
EVAL  and  other  sources,  and  DECISION,  which  shows  the 
effects  of  different  decisions  given  the  scenarios  generated 
by  SPREAD  and  event  probabilities  estimated  by  the  user. 
Implementation : 

The  table  on  the  following  page  summarizes  the  results 
of  the  study. 

Each  column  in  the  cable  represents  a  different 
scenario.  For  example,  column  I  illustrates  the  effect  of 
introducing  DOD  (the  generic  name  for  the  proposed  common 
language)  in  1980  and  achieving  total  acceptance  of  the 
language  by  1985.  (Total  acceptance  is  defined  as  Che  point 
where  all  contracts  for  new  software  are  to  be  written  in 
DOD.)  Programs  written  in  other  languages  are  assumed  to 
continue  throUj^hout  tneir  Life  cycles  witiiouc  rewrite.  Eucn 
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starts  are  In  DoD;  except  for  CASE  IX,  »Aictc 
I  nil  new  starts  are  divided  among  four  languages 


l)OD  commonality  study 


row  in  che  taoLe  rejjresents  a  diftaranc  year  as  iabalad  in 
Che  LetCinosc  coLuinn. 

The  data  in  Che  cable  represencs  millions  of  dollars 
saved  as  compared  Co  a  baseline  of  exclusive  use  of  assembly 
lan^^uaj^e.  Thus,  any  model  chac  considers  che  use  of  nearly 
any  hOL  will  exhibic  savin^jS.  For  comparison  purposes, 
column  X  models  Che  currenC  sicuacion;  cnac  of  "no-chan^e" 
in  DOD  500U.31  escimace  (kef  5:5).  are  escimaced  usin;_,  a 
sofCwara  expendicure  of  3.2  billion  dollars  per  year. 

The  daCa  is  provided  so  Chac  cne  reader  can  maxe  nis 
ovm  conclusions.  The  auclior  scaced  Chac  for  a  5  year 
incroduccion  period,  delay  of  CIkj  incroduccion  from  1930  co 
1987  reduces  savings  by  about  1.5  billion  per  year.  He 
concluded  wich 

Ic  is  recommended  chaC  Cne  DOD  sinj^le  common  ni^h 
order  lan^ua^e  be  introduced  as  rapidly  as  possi'ole 
without  penalizin;^  technical  ijualicy  or 
acceptability...  (Ref  5  :  3) 
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II.  LR(1)  Parsing  automaton 

An  lk(1)  parsin^i  automaton  is  a  machine  caat  can 
recognize  any  sentence  in  a  particular  deterministic 
Language,  and  conversely,  reject  any  sentence  not  contained 
in  tnat  language.  To  define  the  machine,  tae  term  Lan^ua^e 
will  be  defined,  and  a  sample  Language  introduced  to 
illustrate  tne  operation  of  the  rnacnine.  Then,  tae 
components  of  tiie  machine  and  tneir  operation  .;ill  oe 
aescr ibed . 

n  language  consists  of  a  collection  of  symbols,  called 
an  alphabet,  arranged  according  to  a  set  of  rules.  iaese 
rules  are  called  productions,  and  the  collection  of  all 
these  rules,  or  productions,  is  called  a  grammar. 

The  alpnabet  of  the  sample  language  includes  only  tne 
follov;ing  three  symbols  :  BKbAD,  bATb ,  and  JOdU.  Tne 

production  rules  whicn  ^overn  tneir  placement  are  listed 
below. 

]  .  StiNTdiJCL  ;  SUbJbCT  VERB  OiiJECT 

2.  SUBJECT  JOHN 

J.  VERB  EATS 

4.  UBJECT  BREAD 

(The  symbol  means  'is  defined  as ' j 

This  grammar  consists  of  four  productions.  Eacn 
production  consists  of  two  parts,  a  left-hand  side  and  a 
rigut-hand  side,  separated  by  the  symbol  The  number 
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of  syniDoLs  on  che  ri^nc-hand  side  of  a  production  is  called 
Che  lenjjca  of  chat  produccion.  For  example ,  the  length  of 
production  1  is  d.  dote  that  tnese  productions  introduce 
some  new  symbols.  The  symbols  SbdTcdCF,  bUilJbCT,  VbKij  and 
ObJbCT  do  not  appear  in  cue  alphabet  of  che  lan^^ua^e  but 
are  necessary  to  describe  intermediate  representations  of 
che  sequence  bein^  jj,enerated.  Also  note  tnat  only  one  of 
these  new  symbols  does  not  appear  on  che  ri^hc-hand  side  of 
a  produccion.  Inis  symbol,  SFdTFh'Cb,  is  called  tne  start 
syi.iool  of  tne  ^rammar. 

The  start  symool  is  a  representation  or  all  tne 
possiole  strings  caat  can  De  ^^cnerated  by  che  j,raminar.  In 
this  case,  tne  start  symbol  SFMTddCE  is  defined  as  a  SubJbdi' 
collowed  by  a  Vbrtd  and  tnen  an  OBJECT.  Similarly,  a  suoject 
rs  defined  as  JOHil,  a  VEKB  as  EATS  anu  an  OBJECT  as  iiluAJ. 
Therefore,  in  this  ^rammar,  the  start  symbol  represents  tae 
single  sccin(j  'JOtlJ  EATS  BRE.-vD' . 

To  reco,_,nize  a  strin;^  in  a  lan^jUa^je,  the  automaton  must 
reconstruct  the  particular  sequence  of  derivations  cliat 
bct^an  with  che  start  symbol  and  resulted  In  tne  scrLn_,.  Ic 
the  automaton  accomplishes  this  successfully,  tiie  strln^^  is 
accepted  as  part  of  che  lan^^ua^^e;  otnerwise  It  is  rejected. 

The  machine  contains  four  components,  an  input  device, 
an  output  device,  a  memory  device  and  a  control  module. 
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Input  device :  Tde  input  device  consists'  ot  a  tape 
containing  tne  sentence  to  be  checKed,  and  a  liead  to  read 
the  tape.  The  read  head  scans  the  sentence  from  Left  to 
rij^nt  and  provides  the  machine  with  one  symbol  at  a  time. 

Output  uevice :  The  output  device  consists  of  a  blankc 
tape  and  a  write  nead .  The  machine  uses  tne  output  tape  to 
store  a  nistory  of  the  productions  used  to  analyze  tne 
sentence . 

.•lemo  r  /  device :  The  machine's  memory  device  is  a  stacK. 
Eacn  time  the  machine  accesses  the  stack,  it  stores  two 
pieces  of  information.  First,  it  stores  a  symbol  from  tne 
oramraar,  and  then  it  stores  a  table  or  its  representation 
used  to  define  the  machine's  next  action.  These  two  items 
arc  referred  to  as  a  data  pair  in  tne  rest  of  tiiis  appendix. 

Contro 1 :  The  final  component  to  discuss  is  tne  control 
module.  The  control  module  directs  the  operation  of  the 
machine's  only  two  functions  which  are  shifts  and 
reductions.  It  determines  whicli  of  tnese  instructions  to 
execute  by  entering  the  table  scored  on  top  of  Che  stack 
with  Che  next  symbol  on  the  input  tape  as  an  argument.  If 
the  cable  indicates  that  a  shift  snould  be  done,  tne  control 
unit  stacks  the  look-ahead  symbol  and  tne  taole  whose  nai:ie 
is  stored  with  the  stiift  instruction.  It  tnen  advances  tne 
read  nead  to  tne  next  symbol  on  the  input  tape.  Lt  tne 
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Cable  indicaces  Chat  a  reduction  sdouid  be  done,  Che  control 
unit  writes  the  indicated  production  nunber  on  tne  output 
Cape  and  looks  up  Che  Length  or  the  production.  It  removes 
this  number  ot  data  pairs  from  tne  stack  and  tiien  consults 
the  uncovered  Caole.  This  time,  instead  of  usinj,  the  next 
symbol  from  the  input  Cape,  Che  control  unit  uses  tne 
lefc-nand  side  of  tne  production  Co  enter  tiie  cable. 

I'o  accomplish  snitts  and  reductions,  cLie  control  unit 
ast  Know  tne  productions  of  the  grammar  and  also  the 
concents  r  tne  taules.  Therefore,  Che  structure  of  tne 
control  unit  .must  include  a  representation  of  this  data  in 
some  form.  Assume  that  the  control  unit  Knows  the 
productions  wnich  make  up  the  sample  grammar  and  also  cue 
contents  of  Ciie  cables  illustrated  in  the  follov;inj  ri^ure. 


bdhTddCo 

bU  bJdCl' 

VllKii 

ObJliCT 

JOiih 

Li  1  \  1  L> 

bivbAD 

1 -  ' 

TO 

:i 

1  d 

lb 

.  0 

T6 

17 

To 

Accccpt 

T3 

OhiFT,  ’.t 

Shi«t,T8 

‘ 

Shift,  Ti 

Rebuc£,2. 

Shift,  TS 

WeoucC,  5 
Skift,  T7 

1 

1 

! 

1 

1 

Reoxe, 

'(  '  is  a  special  symbol  indicatin^^  'end  of  input'. 

Figure  3-1:  Tables  for  tne  LRCl)  Parsint^  Automaton 
The  inactiine  be^^ins  witn  Caole  TO  on  tne  stacK  and  witn 
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cue  input  unit  Lookin^^  at  tae  first  symuol  on  tl\e  input 
tape.  i'he  machine  will  attempt  to  reco^nice  tne  sequence  of 
symbols  'JOU'J  EaTG  dkGAD  '  as  a  Legitimate  strin^  in  tae 
lan^^uaj^e  specified  by  the  sample  grammar's  production  rules. 
The  machine  enters  table  TO  with  tne  first  symbol,  JOaG,  and 
finds  the  entry  'shift.TI'.  On  this  stiift  move,  tne  control 
unit  stacKs  tne  input  symbol,  JOiUJ,  and  t;ie  new  taole  found, 
n ,  and  then  reads  the  next  symbol,  EATS.  The  current  stack 
configuration  is  illustrated  in  the  following  figure. 


Lhl  riAL  STACK  CUR  REST  Si'ACK 


(TO  ;  JOHh  EATO  SKE.iD  ;  )  (10  ;  <JOdU,T1>;  EATS  SRSAU  (—  ; 

A  i 

Figure  3-2:  Result  of  tae  'Shift,  T1 '  Aove 

The  syr.ibols  wittiin  the  parenthesis  on  the  diagram 
constitute  an  instantaneous  description  of  tne  macnine's 
state.  The  symbols  oefore  the  first  semicolon  represent  tae 
items  stored  on  the  stack.,  the  symbols  between  tlie 
semicolons  represent  the  unprocessed  portion  of  the  input 
tape,  and  tne  symbols  after  tae  last  semicolon  represent  tiie 
contents  of  the  output  tape.  The  left-most  word  of  tne 
input  tape's  representation,  marked  by  A  in  tne  diagram, 
is  the  parser's  current  loox-ahead  token.  Collectively, 
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these  ic'erns  compieteiy  specify  cue  i.iacuine's  current 
conf  itjUration. 

Presently,  the  iteras  TO,  JOHN  anti  T1  are  stacked  and 
Che  Look-ahead  token  is  HATS.  The  control  unit  enters  taole 
T1  wicn  Che  symbol  HATS  and  finds  Cae  entry  'reduce, 3'.  On 
this  reduction,  tne  control  unit  .trices  the  number  3  on  tae 
output  cape  and  looks  up  Che  len^^th  of  production  3. 
Production  3  is  1  symbol  lon^^,  so  Che  control  unit  removes  1 
data  pair  from  the  stacK,  leavin^^,  tne  following 
conf  ij^uration: 

TOP 

(TO  ;  HATS  oKlHAD  ;  2  ) 

Figure  3-3;  Intermediate  result  of  tne  'iteduce,  3'  .lOve 

The  control  unit  enters  cae  table  on  top  of  the  stack 
with  the  leftaand  side  of  production  3,  which  is  the  symbol 
SUbJHCT.  It  finds  the  entry  'shift, T3'.  The  configuration 
of  tne  machine  after  tais  move  is  illustrated  in  the 
following  dia;^ram. 

The  machine  continues  in  tais  manner  until  ft  reacnes 
'AOCtPT'  or  it  cannot  do  a  transition  or  a  reduction.  Ii  it 
reaches  'ACCHPT',  the  input  strin^^  nas  been  successfully 
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TOP 

(TO  ;  <SUiiJGGT,T3>  ;  GATS  BREAD  ;  2  ) 

Figure  3-4:  Final  result  of  'Reduce,  3'  ;Iove 

parsed  and,  thus,  is  a  part  or  the  language  specitied  uy  tae 
jjrainiiiar .  Lf  ciie  macnine  cannot  do  a  transition  or  a 
reduction,  tae  input  string  is  not  part  of  tne  language  and 
it  is  rejecteu.  Ine  following  figure  contains  tae 
instantaneous  descriptions  of  Che  machine  for  every  step 
re4uired  to  recognize  tae  strin„  'JOhii  EAlB  BnEAD'. 

bEGld 

(,TU  ;  JOKd  dATB  BREAD  ;  ) 

(TU,  <JOHh,  Tl>  ;  EATD  BREAD  ;  ) 


fTO ,  <BUBJECr, 

T3> 

;  EATS 

BREAD 

;  2; 

(TU ,  <BUBJECi, 

T3>, 

<EArs, 

T5>  i 

:  BRE<\D  :  2 ) 

(TU  ,  <CUBJECT, 

T3>, 

<VERB, 

T6>  ; 

;  BREAD  ;  2 ,  3 ; 

»,TU  ,  <BUBJECT, 

T3>, 

<VERB, 

Tu  > , 

< bread,  17 >  ;  ;  2,  3; 

^.TU  ,  <1BU BJ EC  1 , 

T3>, 

<VERB. 

Tb>, 

<OBJECr,  TO;  ;  2,  3, 

ACCEPT 

Figure  3-5:  Acceptance  of  tae  String  "JOHU  EATS  BREAD" 

This  concludes  Che  description  of  tae  structure  and 
operation  of  an  LR  (1)  parsinjj  automaton.  altaou^n  its 
operation  may  seem  overly  complex,  tne  automaton  is  .veil 
suited  ror  computer  i.npLementacion.  In  fact,  such  an 
automaton  can  be  generated  automatically  by  computer  ^iven 
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III.  User's  guide 

This  appendix  describes  cue  input  accepted  ay  tne  test 
compiler  and  tne  output  wnich  results.  beveral  example 
programs  are  also  included. 

Input :  Input  to  tne  prograti  snoulu  be  an  nda  text  tile 

wnose  constructs  Pave  been  selected  from  tiie  implemented 
subset.  Language  constructs  taat  nay  be  used  to  compose 
input  programs  are  listed  below. 

I.  Integer  variables.  b’umoer  declarations  and 
variable  initializations  are  not  implementeb . 

d.  racK.ati,e  declarations. 

J.  Proceuures  and  functions  witn  parameters  C-'ioue 
types  may  be  specified) 

a.  Tasx  ueclarations . 

5.  Selected  components  may  be  used  to  open 
visibility  to  objects  that  are  witnin  scope  but 
which  are  not  directly  visible. 

o.  Most  integer  aritnmetic  or  boolean  expressions 
may  be  used  including  tnose  using  snort  circuit 
conditions.  However,  the  tollowing  list  or 
operators  has  not  been  implemented;  MEM,  ,  a, 

Id. 

7.  Tne  following  statements  may  be  used: 

a.  Assignment 

o.  Procedure,  function  or  entry  calls 

c.  Lxit 

d.  Heturn 

e.  TP  luoM  cLSIP  uL:jL 

■J  b 
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Ill.  User's  guide 

This  appendix  describes  che  input  accepted  by  the  test 
compiler  and  the  output  which  results.  Several  example 
programs  are  also  included. 


Input ;  Input  to  tne  program  snould  be  an  Ada  text  file 
whose  constructs  have  been  selected  from  the  implemented 
subset.  Language  constructs  that  may  be  used  to  compose 
input  programs  are  listed  below, 

1.  Integer  variables.  Mumber  declarations  and 
variable  initializations  are  not  implemented. 

2.  PacKage  declarations. 

3.  Procedures  and  functions  with  parameters  (mode 
types  may  be  specified) 

4.  Tasi(  declarations. 

5.  Selected  components  may  be  used  to  open 
visibility  to  objects  that  are  within  scope  but 
which  are  not  directly  visible. 

6.  Most  integer  arithmetic  or  Boolean  expressions 
may  be  used  including  those  using  short  circuit 
conditions.  ,  However,  the  following  list  of 
operators  has  not  been  implemented:  REM,  **, 


7.  The  following  statements  may  be  used; 


a.  Assignment 

b.  Procedure,  function  or  entry  calls 

c.  Exit 

d.  Return 

e.  Ic  THE.]  ELS  IF  ELSE 
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t.  Accept 

a.  loops  (except  FOR  loop) 

Output :  The  output  of  the  prOj^ram  is  dependent  on  a 

specially  defined  pra^jma.  This  pragma  was  added  to  allow 
more  direct  control  of  tne  program  throughout  its 
development.  Its  format  is: 

PRAGMi\  TOGGLE  (  <OPTIOG_STKli'JG>  )  , 

where  <OPTIO£j_STKliJG>  is  composed  of  selections  from  tne 
following  list  of  options:  EXECUTE,  TRAGESTOKE,  Pkl.li’GODE, 
rKiiCEPAKSE,  TkaGETUK.  .Multiple  selections  must  be  separated 
by  commas . 

All  of  these  options  are  initially  off.  To  select  an 
option,  list  it  in  an  option  string,  and  the  compiler's 
output  will  be  as  defined  below: 

EXEGUTE :  If  no  errors  are  detected  in  the  input 
program,  the  program  will  be  executed. 

TKrtGESTOKE :  TRAGESTOKE  will  do  nothing  unless  EXEGUTE 

is  also  selected.  If  EXEGUTE  is  selected,  each  value  stored 
during  the  execution  of  an  ISTOKE  or  ENTISTOKE  command  will 
oe  printed. 

PKIhi'GODE :  The  code  generated  by  the  compiler  is 

formatted  and  printed. 
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TRACE? ARSE :  Each  transition  or  reduction  made  by  the 
parsing  automaton  is  printed.  This  listing  is  fairly  long 
even  for  a  short  program. 

TRACETOK :  The  representation  of  each  token  passed  from 
the  scanner  to  the  parser  is  printed.  This  represent  ; : ion 
consists  of  the  token's  vocabulary  index  as  output  frot  the 
automatic  parser  generator  (Ref  13). 

The  following  examples  illustrate  the  effects  of  select¬ 
ing  these  options  given  a  simple  input  program. 


ADA-G  COMPILER 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

1  —  THIS  EXAMPLE  ILLUSTRATES  THE  COMPILER'S  OUTPUT  .■n:TH 

2  —  NO  CONTROL  INFORMATION. 

3 

4  PROCEDURE  MAIN  IS 

5  A  :  INTEGER; 

6  BEGIN 

7  A  3; 

8  PUT  ("  A  -  ") ; 

9  PUT_LINE  (A) ; 

10  END  MAIN; 


ADA-G  COMPILER 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

1  —  NOW  THE  SAME  PROGRAM  IS  INPUT  TO  THE  COMPILER  WITH 

2  —  THE  EXECUTE  OPTION  SELECTED. 

3 

4  PRAGMA  TOGGLE  (EXECUTE) ; 

5 

6  PROCEDURE  MAIN  IS 

7  A  :  INTEGER; 

8  BEGIN 

9  A  :  *  3  ' 

10  PUT  ("’a  -  ") ; 

11  PUT_LINE  (A); 

12  END  MAIN; 

A  -  3 
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1  --  OPTION  PKINTCODE  PRINTS  THE  CODE  GENERATED  SY  THE  COMPILER 

2  —  FOR  THE  INPUT  PROGRAM.  THIS  OPTION  IS  SELECTED  IN  THIS 

3  —  EXAMPLE. 

4 

5  PRAGMA  TOGGLE  (PRINTCODE) ; 

6 
7 

a  PROCEDURE  MAIN  IS 
9  A  :  INTEGER; 

10  aSGIN 

11  A  3;  1 

12  PUT  ('•  A  -  "); 

13  PUT  LINE  (A); 

14  END  MAIN; 


***  PRAGMA  PRINT  CODE  *** 


INDEX 

i’H'lEMONIC 

LEVEL 

ADDRESS 

0 

JMP 

0 

1 

1 

INCT 

0 

18 

2 

ILOADCONST 

0 

3 

3 

ISTORE 

0 

17 

4 

SPUT 

0 

5 

5 

DATA 

0 

32 

6 

DATA 

0 

65 

7 

DATA 

0 

32 

a 

DATA 

0 

61 

9 

DATA 

0 

32 

10 

I  LOAD 

0 

17 

11 

I  PUT 

1 

0 

12 

RETURN 

0 

0 
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1  —  NOW  THt;  TKACiiSTOKt:  OPTION  IS  SELECTED. 

2  —  THIS  OPTION  WILL  PRINT  THE  VALUE  STOKED  DUKINC  THE  EXECUTION 

3  —  OF  THE  ISTORE  INSTRUCTION  (INSTRUCTION  NUMSER  3  IN  THE  PREVIOUS 

4  —  EXA*4PLE. 

5 

6  PRAGMA  TOGGLE  (EXECUTE,  TRACESTORE) ; 

7 

a 

9  PROCEDURE  MAIN  IS 

10  A  :  INTEGER; 

11  BEGIN 

12  A  3; 

13  PUT  ("  A  -  ")  ; 

14  PUT_LINE  (A); 

15  END  MAIN; 


PRAGI-IA  TRACESTORE  *** 

EACH  VALUE  STORED  DURING  EI^ECUTION  OF  AN  ISTORE  COMl^ND  IS  LISTED 

3 

A  -  3 


aDA-G  COMPILER 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 


1  —  NOW  THE  RATHER  LENGTHY  OUTPUT  GENERATED  BY  THE  TRACEPARSE 

2  —  OPTION  IS  DEMONSTRi\TED.  EACH  TRANSITION  OR  REDUCTION 

3  —  MADE  BY  THE  PARSING  AUTOMATON  IS  PRINTED.  TO  LIMIT  THE 

4  —  LENGTH  OF  THE  OUTPUT.  A  SHORTER  PROGRAM  IS  INPUT  AS  FOLLOWS: 

5  — 

6  —  PROCEDURE  MAIN  IS 

7  —  BEGIN 

8  —  NULL; 

9  —  END  MAIN; 

10  — 

11  —  AS  YOU  WILL  SEE,  THE  PARSER  IS  VERY  BUSY  EVEN  WITH  A  SIMPLE 

12  —  EXAMPLE  LIKE  THIS. 

13 
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14 

15  PKAGL>li\  TG.,GLt;  (TKACEPARSE)  ; 

PRODUCTION  13  /uJD  TRANSITION  FROM  STATE  2  TO  STATE  7 
TRANSITION  FROM  STATE  7  TO  STATE  41 

16 

17  PROCEDURE  .uUN  IS 

PRODUCTION  16  AND  TRANSITION  FROM  STATE  2  TO  STATE  8 
PRODUCTION  15  AND  TRiUNSITION  FROM  STATE  2  TO  STATE  9 
PRODUCTION  385  ..ND  TRANSITION  FROM  STATE  9  TO  STATE  46 

PRODUCTION  371  .^ND  TRANSITION  FROM  STATE  2  TO  STATE  6 

TRANSITION  FRO..  STATE  6  TO  STATE  13 

PRODUCTION  274  .iND  TRANSITION  FROM  STATE  6  TO  STATE  34 
TRANSITION  FRO.  STATE  34  TO  STATE  11 

PRODUCTION  8  .-...D  TRANSITION  FROM  STATE  34  TO  STATE  113 
PRODUCTION  280  aND  TRANSITION  FROM  STATE  34  TO  STATE  112 

PRODUCTION  440  AND  TRi\NSIT10N  FROM  STATE  6  TO  STATE  35 

PRODUCTION  284  .vND  TRANSITION  FROM  STATE  35  TO  STATE  116 

PRODUCTION  232  .O'lD  TRx^SITlON  FROM  STATE  1 1 6  TO  STATE  207 

PRODUCTION  27  5  TRANSITION  FROM  STATE  6  TO  STATE  37 

PRODUCTION  271  .AND  TRANSITION  FROM  STATE  6  TO  STATE  38 

TRANSITION  FROM  STATE  38  TO  STATE  117 
13  SEGIN 

PRODUCTION  276  AND  TRANSITION  FROM  STATE  6  TO  STATE  39 
PRODUCTION  25  AND  TRANSITION  FROM  STATE  39  TO  STATE  119 
PRODUCTION  441  .-^iND  TRANSITION  FROM  STATE  6  TO  STATE  40 
TRANSITION  FROM  STATE  40  TO  STATE  104 

19  NULL; 

PRODUCTION  204  .\I>ID  TRANSITION  FROM  STATE  104  TO  STATE  195 
TRANSITION  FROM  STATE  195  TO  STATE  313 

PRODUCTION  219  AND  TRANSITION  FROM  STATE  195  TO  STATE  333 

PRODUCTION  208  AND  TRANSITION  FROM  STATE  195  TO  STATE  340 

PRODUCTION  202  .\ND  TRANSITION  FROM  STATE  104  TO  STATE  197 

TRANSITION  FROM  STATE  197  TO  STATE  341 

20  END  MAIN; 

PRODUCTION  200  AND  TRANSITION  FROM  STATE  104  TO  STATE  198 

PRODUCTION  259  AND  TRANSITION  FROM  STATE  198  TO  STATE  343 

PRODUCTION  258  AND  TR/\NSITION  FROM  STATE  40  TO  STATE  120 
TRANSITION  FROM  STATE  120  TO  STATE  209 
TRANSITION  FROM  STATE  209  TO  STATE  11 

PRODUCTION  8  AND  TRANSITION  FROM  STATE  209  TO  STATE  113 
PRODUCTION  280  AND  TRANSITION  FROM  STATE  209  TO  STATE  351 

PRODUCTION  279  AND  TRi\NSITION  FROM  STATE  209  TO  STATE  352 

PRODUCTION  277  AND  TRANSITION  FROM  STATE  6  TO  STATE  36 

PRODUCTION  373  i\ND  TRANSITION  FROM  STATE  6  TO  STATE  20 

PRODUCTION  380  AND  TRANSITION  FROM  STATE  6  TO  STATE  24 

PRODUCTION  372  AND  TRANSITION  FROM  STATE  2  TO  STATE  4 

TRANSITION  FROM  STATE  4  TO  STATE  13 

PRODUCTION  4  AND  TiCuNSITION  FROM  STATE  2  TO  STATE  5 
PRODUCTION  3  AiJD  TRANSITION  FROM  STATE  2  TO  STATE  10 
TRANSITION  FROM  STATE  10  TO  STATE  48 
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bOURCt  LISTING 


IV. 


Source  listing 


91 


o 

O  --V 

•X 

3 

H 

3  O 

3 

O 

<  3 

> 

>  < 

as 

3 

'3 

3 

3  O' 

C-l 

—  3 

—  a 

3  as 

•«  ••  3 

>■  3 

— 

o 

3  3 

3 

II  II 

3 

3  3 

II  Ln 

•-1 

3  3 

O  ^ 

H  3 

3  C-4 

O  > 

3  3 

■it  3  -X 

3  ^  M 

3  < 

3  3  3  3 

<30 

3  3 

3  3  3  0 

3  as  O 

O  C'J  a<  M 

3  0  3  3 

3  3 

3  t-t  3  H 

-jS  3  3  as 

3  O 

-3  3  < 

3  3  3  3 

3 

3  <  3  3 

<3  H 

3  3 

3  3  3  3 

3  '3 

O  3  o  tt; 

—  3 

-0  o 

2S  3  3  3  ^ 

-  -O 

P-4 

a-  3  H  3  4< 

04  O  <— 

>-i  u  a 
3  jJ 

■jJ  3  2S  3  O 
'J  H  H  U 
■3  M  3  iJ 
>«  3  3  3  as 


X  X 

3  3  3  3  SLi  3  O 

•  • 

'3  3 

3  3  <  3 

04 

S.  3 

333300333 

■— V* 
■w 

O  O  O  O  3  '3  3  H  3 

II 

3 

3  3  i-t  3  3  3 

•X 

3  3 

3  3  3  3  <  < 

3 

o 

< 

3333>  -CJ 

3 

3  3 

3  0  3  3  3  —  -ON 

3 

O  O 

3  o  s  t;  H  —  u-i 

— V 

3  3 

3  3  3  3  0 

3 

3 

3  3 

3  3  Z  H  <  II  3 

< 

-X  -X  4e  It  II  ^ 

>> 

3  3 

3 

•  • 

O  'J 
O  -J  3 


•X 

Q 

3 

O 

3 

Z  3\ 

o  -x 

3  3 

H  3 

<  3 

■X 

>  O 

^  3 

y-\ 

3  3 

-X 

H  3 

Z  3  3 

3 

O  3 

0  0  3 

O  -X 

< 

3  3  3 

3 

o 

3  '3  Z 

3^3 

3  H 

3  3  3 

3  -it  3 

3 

3  O  X 

3  3 

<  z 

3  0'-' 

3  3  3 

H  O 

O  3 

OHO 

3 

3  3 

^  <  Z  3 

O  H 

3 

■X  H  3  3 

H  O 

3  3 

3  3  0 

3 

3  >  — 

3  ^  3  Z 

Z  3  3 

H  -X  3  O 

3  3 

3  3  0 

Z  3  >  3  3 

3  3 

Z  O  O 

3  3  3  O  H 

-X  Z 

-  O  <  3 

O  H  3  <  O 

3 

3  <  1  H 

O  Z  O  H  3 

•  • 

O  Z  3  Z 

3  <  '3  3 

3  3 

Z  3  3 

O  O  H 

O  3 

<  3  H 

<303  3 

Z  < 

3  O  <  •• 

3  H  O  Z 

<  3 

-3  3 

0  3  3 

-3  -X 

3  3  3  3 

O  <  3  3 

3.  3  '3 

3  3  3  Z  -3 

3  3  H  O 

3  3 

O  3  3  3  < 

‘  ■!<  -K  - 


3  -as 
H  CT  3 


n  •  -3 

c-  -3  a 

-3 


3  iJ 
3  3- 
1-13  3 

>-  <  3  •*> 

'^5  tiJ  ■!< 

3  ••  H  3 
a  3  3 

'  3  -(  -4 

3  H 

3  ••  3 
••  H  3 
3  H  as 
:j  aj  3  3 
H  3  3  3 
<333 


3  3  3 
3-k  3 
3  '-'3 
•J  3 

3  H 


<3  3  <— 
3  3  3 
3  3  3 
3  3  — 

•  3  < 

•  3  3 
^  h-t  3 
— <  3 


o 

3  0  oa  It 

3  3  <  < 

a 

u-l  O  O  3  < 

••3  3  Z  O 

a 

■5^ 

>> 

* 

—  0  3  3 

3  3  <  M  H 

3  «  < 

1 

:ij 

a> 

< 

3 

3  3  II  O  Z 

o  o  z  < 

O  3 

•  H 

X 

3 

3 

o 

3 

3  Z  3  H 

a 

3 

O  3 

O 

• 

2j 

• 

3 

3  0  3  3  0 

z 

Z  04 

3 

z 

M 

• 

>• 

-*• 

55 

3 

li,  3  •  3  3  Z 

o 

O  3 

II  3X 

3 

< 

3 

3  H  ^  0  0  3 

M  ••  ••  ••  *• 

3  3  — 

O  3 

3 

•  • 

'.J  X 

3  <  3  3  O  J 

H  O  <■  3  04 

H  3  O 

3  3  3 

3 

< 

o  t: 

3 

H  H  3  3  3  Z 

3  — 

3  Z 

3  3  3 

3 

>< 

O 

Z  3  3  3  3  0 

3  II  II  n 

3  <  II 

3  0  3 

3 

< 

o 

X  X 

3 

3  3  <  O  >1  3 

3  H 

3  3 

3  3  3 

3 

•  • 

3 

X  • 

3 

a.  3  O  3  3 

O  o 

0  3  0 

3  Z  3 

3 

3 

3  55 

o 

3  3'-'  3  <  Z 

3  3  O 

3  >1  '3 

3  3  0 

Z 

a 

>• 

3 

'-ij  X 

3 

3  3  3  Z  O 

3Z03aj 

3  3  H 

O  z  3 

o 

a 

O 

55  X 

Z  H  a  H  Z  3  3 

a  3  H  3  < 

a  H  < 

3  0  3 

z 

UJ 

•• 

< 

O  3  Z 

3 

Z  Z  3  3  Z  3  3 

X  J  Z  O  3 

X  z  o 

3  3  <  X 

X 

>J 

5^; 

ZD  -J 

3 

3  3  O  Z  Z  3  3 

>3  V3  <  H  Z 

'-'CJ  3 

3  3  Z  ^ 

v' 

55 

3 

OX  O 

>* 

3 

0  3  O 

3 

> 

X 

3 

3 

3 

Oi 

^:'4cO'J.n3r^30NO^C'J<3<ru^Or^33N3*—  C‘■l.3<•^/^Or^33^3•—  rv).3'3--nOr^3 
^  —  t—  ^  ^4  CM  04  CM  .-s  f'4  -N  .3  .3  ,3  ,3  .3  .3  ,3  .3 


M  i-i  yi 

<  c?  =- 

3  jJ  H  ^ 
v3 

H  O  C 
r-i  O  H  H 


•  -.J 

:iS  >1  H 
as  U  ^  3  i 
yj  -r  <  i-t 
'O  3  yi  O 
•j  y)  a.  1 
H  '-J 

3  rs  U  = 

M  '_J  yj  'o 

:d  3  f-i 

••O'  :s 

-  -.  ^  : 

3  z:  <  as 

3  H  o  jJ 

as  O  i 

O  "S  '-J  •  J 

73  O  3  H 

'^-3  ai  H  3  ! 


fa4 

3 

►d  <  3 

< 

< 

'3  'J. 

a-  < 

3  0 

■X 

3  3 

3 

'O  0 

H 

>4  Id 

3 

3 

3  3  2 

i-l 

3 

•  • 

3  3  H 

3 

3 

0'3  3 

T- 

H  3 

3 

0  C 

< 

3  — • 

■3  3  0 

3 

3  70 

v:  '.J 

3  0  SI 

3  0 

3  3  3 

3 

M  •t; 

> 

3  3  fd 

O'  3 

<5  3 

y-i 

3 

3  Id  3 

P 

—T 

3  3 

•• 

H  ID 

'O  'fa  < 

3  3 

3-0 

3 

0  -4  Id 

^  3 

H  3 

3  3 

^  U 

3  0  =-i 

3 

3 

>4  ..  .. 

70  H 

0  •:2 

331-1 

H 

^  + 

1  3  —  —  — . 

< 

h-i  H 

3  3 

3 

1000 

3  3 

•  • 

3  3  3 

■X 

0  TS 

0  3  3  3 

■X 

3  3 

^  71 

'3 

3  3 

as  3  ..  ■j'i  ..  < 

0  3 

3 

>  3  3 

3  ■•3 

0  3— .<—.3 

3 

3  3-^ 

70 

••  > 

M  3  3 

— .  3 

70  3  0  0  3  3  3 

■3 

H  H 

•1: 

00  H 

3  3  3 

70  3  70  0  3 

3  3 

3  3 

3  3 

3 

3  < 

3333-1-  0-1- 

0 

-  3  -J 

■■a  3 

3  3 

'3  3 

'3 

<  <  3 

'0  2  3  3 

<5 

> 

0 

3 

<  as 

3  -i;  • 

'O 

H  3  — 

0  3  0-1-3  3 

■3 

3  3  '-I 

3  3 

3 

3  — 4  ^ 

d 

3  0  0  H  -1-  H 

Id 

3 

3  3  3 

3  H 

•< 

0'3 

3 

3 

0  — j  3 

3  3  3  3  3  3 

< 

:j 

0 

-w4<; 

■-  3 

-^0 

3  3  < 

3 

3 

3  H  3  3  3 

H 

0 

0 

3  3 

0  — 

— >  O,  .. 

1-4 

333 

3 

>  >4  II 

3  '3-3  70  H  3  •- 

3 

'd  0  3 

O  3 

•X  ^ 

70 

S!  H 

■X 

3  0” 

0  3  <  3  -S  >4 

II 

3  3  H 

1 

3  3  -x 

3  3 

3  3 

'o  -1: 

H  3  70  H  3  H  3 

•• 

•• 

J  H  yj 


3 

3  3  2  ••  >  3 

7-1 

3 

"Z 

0  3  /\  3  2 

II  < 

0 

020  333 

••  23 

3 

3  0  0  >70  -X 

1-^ 

•0 

-S4  ^  :d  <  jl  W  3 

< 

3  '3  3  3" 

70  3 

0 

z 

2  'O  3  3 

<  3 

0 

M 

0  3  2  '3  >  0 

23  -X 

70 

303  3332 

0  -3 

.3  3  3  2  3  fd  3  3 

2 

Id 

0  -X  3  2 

r* 

3 

H 

2-3  0  2 

3  Q 

0  3 

2 

3 

3  3 

'3 

U-l  <lj  • 

73  --J  ►-<  3 
73  as  H  O 

-S  3  -4 
O  3  H 
3  -d  — •  3 

as  'O  O 

3  0  3  3 

o  as  3  >s 
3  a,  3  TJ 
O  •)« 

o  ^ 

as 

a^ 


3  3 
H  3 
<  H 
'-U  3  a, 
O  'a-  3 
70 

3  3  <1; 
'C  O  H 
■C  <I 

'■fa  73  3 
< 
> 


3  — 
3  3  3 

H  II  < 

3  O' 
3  3  — 

-4  H 
3  i  >4 
3  3  0 
3  3  70 
M  -X  1:  3 
3  H  3 


3  O  <  —  70 

3  3  H  < 

S3  3  3  —  3  H 

3  -J  3  — 

3  <  0  73  II 

<  H  O  ■•  3 

1-133  II 
H  Oi  ••  3  II 

3  3  70  •• 

3  3  3  O  -=1; 

1-4  H  H  3  3  H 


70  —  3 
<  3 

H  3 


3  3  -> 
3  H  -X 
O  II  -I  -3 
3  ••  3  O 
f-i  -X  — I 
3  H  ^  70 
3  3  70 

as  3  c 
3  O  O  -X 

3  'O  3  -a 
0^3 


y^3'-^-ln-3•l^o^^3a^3'— cM.-o^-oorscoaNO  —  .''i.~0'S’7aor^'3y'3  —  si.3'j’3o 
.••a'i’^>a''3‘'3''vf'3’<f-<t<f7ajOL.-a.,'a7a7au'a7avOJ03vOoo30oooop~r~'S«r^i''.'->» 


>1 

5-4 

a 

.—1  ^ 

2a  ^ 

o  2a 

U4 

K-l  75 

•K 

2a  ^  c 

IjJ 

•  Ch 

o,  H  H 

75 

'J 

0 

O,  25  O 

•  C 

0  3  0 

O' 

00  0 

75  O 

O  -1 

:n 

'-a  H 

2a  _5  H 

>- 

'O  VD 

75 

25  r-l 

0 

C  75  ^ 

a  25  c 

H  t;  •)« 

2a  o  3 

:i-  0 

O  '-J 

o  H 

0 

O  75  O 

5h 

2  ^ 

3  75  jj 

O  '55 

2^ 

to 

— 1  7J  25 

i-l  2: 

Ju 

H 

H  O  O' 

0 

00  -J 

0 

M  O 

75  »-  M 

1-#  .* 

a 

0 

>• 

25  2a 

lo  *- 

00  M 

3  a 

0  5W  0, 

ua 

< 

25  H  1 

'T?  1 

to  H 

a 

O  7J  25 

0  i-i  H 

0 

00 

zz 

'-H  2a  2a 

O'O  75 

0  ^ 

ro 

c 

0  a 

r: 

H- 1  1-4 

0 

75  7J 

>1  ►H  0 

tXrf 

014 

2a  25  25 

a  25 '  *' 

U  ::4 

o  2a  :-i 

c  a  ^ 

r  < 

<  -J 

75  25 

■j  0 

H  ^ 

b 

75  3  3 
H  1-1 
U 

O  75  CJ 


r:  -j  52 
L3  2a  v-l 
-5  25  J  -J 


5a  a 
3  7J 
2J  <  25 


^  c  0 

a  a 

3  a 

-75 

(a  -2 

75  a 

a 

a  a 

0  H 

■*75  a  0 

0  a 

0  a 

25  0  a 

75  a  0 

a  a 

.-25  30 

-5  0  C 

a  0  0  a 

a  a  s 

a  a  3 

a  a  a  a 

c  0 

a  <  0 

a 

Has 

33 

a 

25  a  z 

-0  H 

75  a 

a  C 

w 

•a  0 

a  a 

r-  75 

< 

a 

75  c  a 

a  a  a 

r5 

25 

H  a 

a 

0 

0  C 

0  a  0 

3 

a 

0  a  0 

II  a 

73 

•*  X 

a 

0  a 

a  H 

•  * 

0  25 

a  0  H 

••  0 

• 

—  a 

75 

a  0 

a  a 

to 

to 

a 

a 

0 

■  ,1 

a  a  c 

a  75  -a 

■-0 

II 

••  a  75 

X  a 

X 

+  0 

•3 

a  a 

C  a 

to 

0  a 

a  z 

a  a 

u 

■-0 

C  75  H 

■•  H 

:d 

a  —  a  •- 

a  0  a 

0  s 

3 

X  a 

25  a 

a 

u-5 

0  a  a 

0  0  25 

35  •*» 

0  0 

a 

a 

a  0  -a 

a  0 

a  a  a4< 

75  a  H 

to  7Z 

a  Z 

0  II 

II  a 

a  0  a 

75  Z  X 

to 

o 

a  a  c  a 

75  a  a 

’O  < 

a 

0,  7J 

•• 

•  •  a 

2)  a  75 

C  a  a 

r*^ 

h-4 

a  ?j  a 

a  a 

to  :o 

II 

»3 

«-4 

•  -0  a  c 

a  a  a 

•^4 

c  c 

0  a 

35 

d,  05 

a  a 

a  a  z  a 

0  a  a 

04 

■.  II  H 

0  a  z 

0 

a 

02  H 

0 

0 

a  a  o 

Z  C  0 

73 

'  ••  1 

a  a  0 

M  0 

a  X 

O 

11  “3  00 

75  z 

0  0  a  0 

a  3  a 

r, 

•  • 

0 

Oui  a  a 

33 

a  a 

:/0  II 

••  '-0  00 

a  0 

25  75  z 

H  a 

4.5  X  a  z 

a  H 

•  • 

C  0 

73  •• 

—  -O 

*0 

a  0  < 

a  Z  a  25 

35 

Q  -a  a 

a  0  0 

•• 

a  z 

0 

X  H  'J 

■a  a 

CO  H 
3  M  '-J  iJ 
H  ■—  5a 


c  c 

■  'J  H  M 
5a  o  C 


a  o  z 

i-(  *-1  22 


■r-<  O  O 

n  a.  o  z 
a:  o 


o 

o  o  2a 

3  0  0. 


0 

000 

z  a  a 

c 

a  z  3 

z  a 

Z  25 

0.  0 

a  a  a  a 

a  a 

3^ 

a  a  0  a 

0  Z  25  0 

S 

a  a  a  4< 

0  z 

:0 

a  0 

0  a 

a  a  0  a 
a  a  25 

a 

:d 

a  a  a 

a  a  3  Z 

a  a  3-1 

a  25 

zz 

a  a 

0  a 

t£4 

a  a  'a 

0 

000a 

H  a  ^  C 

a  0 

a  a  a 

a  a 

0  a  a 

h-t 

a  a 

75  a 

00 

0  a  a  a 

a* 

C  a 

c  0  c 

0  3  3  23 

a* 

a  0  0 

a 

a 

a  a  a  C 

Z  -a 

>  a 

Z  -a 

a 

a  a  3 

a 

a  a 

35 

CJ4< 

23 

a 

25 

25 

c 

a 

0  ^ 

a 

a 

to 

a 

> 

a 

a 

»0'0»-c'4.-n'j7^of^.-3r'0.—  r-5r5C-uaor^coo>o.—  .'j.-a~d'75or'722>0'-cNm<t 
:^^..0072c0•72c0c050c.^50  72  3^0^^^3^3^3^c'0^0^2^0000000000.—  —  —  —  — 


iifi’i':KPKL;Ti:u  buuRcii  LitiiiMc 


I 


■X 

jj 

i 

3 

] 

:j 

3 

O' 

lij 

•a 

> 

a 

7^ 

a 

— 

,, 

a 

23 

■iJ 

3 

3 

oi 

!ju 

o 

jj 

—4 

>--N 

a 

;3 

a 

/-N 

II 

jJ 

a 

2: 

■)*< 

•  * 

H 

Cu 

3 

23 

o 

'v5 

liJ 

3 

3 

• 

3 

2J 

/\ 

O' 

3 

•  • 

•  •  ^ 

“7 

f-t 

23 

• 

1 

a 

a 

a  3 

3 

< 

a  i-< 

-a 

H 

-“4 

0 

a 

a 

4^ 

* 

b 

a  - 

•a 

■4^ 

T 

H  a 

< 

—4 

2 

:o 

>— <  .-s 

1-4 

0 

■a 

“3 

a  <i 

•X 

a 

•X  3 

3 

M  o 

s-/ 

•TO 

a  -a 

<  --5 

<• 

••  lt4 

a  a 

0 

3  a 

2 

1-4 

3  -a 

3 

w  'J 

a 

><  - 

a  0 

•J 

a 

0  0 

C-4 

4—^ 

a  o 

a 

M 

a  a 

••VO 

0  a 

'-N 

a 

TZ  ^ 

a  -a 

33 

— .. 

3 

0 

<  a. 

3 

0  < 

0  0  a  a 

0 

2 

'j2 

a 

h.4  ^ 

2  .«% 

a  3 

•a  3 

0 

a 

-J 

a 

a 

a  — 1  /\  3  a  <  a 

•C4» 

3 

•a 

a  a 

•  • 

a 

a  -a 

3  >1  v  i-(  3  a  'S 

0  70 

■3 

•a 

0 

;-4  :-4 

ana  <: 

2 

•a 

0 

■3 

-rj 

J-J  — ^ 

H  2 

VO  0 

0 

2 

\/  • 

1-4 

H 

a  a  0 

4-0  ^ 

a  VO 

0 

2 

'-/S 

o. 

3 

•-  0  a 

H  II  -X  H 

'O  -a 

'>^ 

0  /N  1-4  2 

a  ••  -a 

0  a 

O4 

o  < 

aJ 

•  • 

V  a  i-t  H  a  a  ^  II  •* 

a  -0 

< 

■>■3  H 

+ 

a,  O' 

II  aaaH— a-x 

a  0 

>4 

*4^ 

73  -J 

H  3 

•  •  — 

3  0  3  >4  -x 

-✓ 

■v' 

N3 

■-J 

•  • 

a 

+ 

V-/  ^ 

>•  + 

a  a  a  o'a — 'a 

a  a 

< 

mU 

'j  “-I 

< 

C-t 

— >-* 

H  0  3  a  >4  3 

X  a  s 

O4 

'.0 

0  H 

+; 

> 

a 

a 

O' a 

0  i-i  a  a 

—■a  a  3  s  H  a 

H  <  Z5 

-M 

-4 

> 

•  •« 

1 

:j5  M 

a 

<c 

2  ^ 

a  a  <  H 

a  a  a  a  a  3 

a  3 

2 

a 

>4 

04  C 

.j 

a 

a 

^  2 

3  0  a  a 

3  a  O' 

2  'J- 

Qi 

3 

a  3 

25 

04 

< 

3  •• 

a  a 

i-i  a  s 

n  0  +  VO  a  0  1 

a  0  0 

0 

2 

a  ^ 

a 

■3 

a 

a 

a  a  a 

••3  a  3  a  3 

2  ^ 

3 

V3 

■> 

3 

3 

a 

II  -x 

H  'J 

a  II  H 

a  70  -a  a  a 

3  3 

>>3 

3 

”7 

^  2: 

-r- 

3 

••  3 

3  a 

a  a  a  <;  3  a  | 

2  1-4^ 

•-H 

-  .^ 

II 

a 

II 

a 

iJ  3 

a 

a  H  a  a  O'—  a 

3  < 

a 

-0 

. « 

II 

0 

11 

•  • 

1 

•a 

3 

a  3 

a 

a  >■  a 

a  a  s  -X  -x  a 

a  a  II 

< 

0  3 

•  • 

a  a 

•K 

0 

H  -x 

a  a 

0  a  H  a 

^  IJ  ^  ^ 

•:<  3  •• 

—4 

II 

3 

1 

a  a 

l—l 

a 

a-  N-^ 

a  'o 

-S  <  a  a 

-a  a  a  33 

'■^ 

0. 

II 

•  • 

a 

1-4 

— <  < 

5^ 

3 

< 

a  0 

a  a  3  -( 

a  H— 0  <  a 

H  ^ 

k— 4 

•  • 

■^0 

'< 

a  a 

a 

3J 

a  a 

a  a  a  3 

•X  3  -a  -a  -x 

a 

77 

2 

•.j 

3 

1-t 

“2 

a 

3 

a 

“Z 

a  a 

Jj  04 

■3 

H  H  3 

'-4  a  'a  -VO  a  a- 

3  -3  a 

i-< 

3 

Oi 

2 

3 

"3 

3 

-T 

'O  -x 

— ^  Ut 

a 

-K  0 

-IC 

—4 

•J 

114 

•23 

a 

0  ^ 

3 

-4 

a  3 

0  'a 

•w' 

“3 

a 

a 

2 

3 

O4 

a 

-J 

23 

0 

p^  CO 

3>  0 

cNiro-<^unors.coo>o  — 

ro  <T  .n  0  !-•'  CO  3 

^  rsi  .-o  -d*  «--> 

0 

*0  r^ 

2 

74 

1 

—  ^ 

— 

fM 

r'i 

,-N 

r*j  m  ro  po  ro  ro  m  ."O  <r>  ro  nJ  ^  ^  >3* 

<j- 

<3*  -n 

-0 

i 

IbJ  ICOUNT  :=  0; 

154  CUKl<k;UTJOb  :=  1  ; 

155  (*ltlITLALlZb:  Tilt;  ST'ACKt'KA.lt;*) 

156  FOK  i  :=  1  TU  TASKFKAilFblZF 


•(AanrH^-'i  ntn 


191  Si'll!'  :  bSUIN  (*l'UItjr  .TUli,'G  --  Ll-lNGTil  SlOKhU  hi  AUULi  t'Lf^LU-' 

192  t’UU  1  :=  1  TO  aDUR  DU 

193  UklTS  (CtlK  ((jODliLRCJ  .ADUK)  ;  1  )  ; 

194  PC  :=  PC  +  1 ; 


-0 

la 


■j^ 

3 


'O 

3 


• 

V3 

> 

• 

-2 

72 

-H 

Cli4 

o 

:;2 

> 

•K 

3^ 

• 

-J 

vg 

1— ( 

•  • 

< 

< 

llj 

£-( 

'O 

5 

•X 

M 

< 

o 

H 

'X| 

•< 

X 

'j 

2 

-  y 

4< 

--  -4 

O 

□ 

+ 

1 

Vi 

£-1 

— ^  X 

:< 

o 

— 

'.0 

V- 

o 

V- 

X  + 

>-N 

•i*' 

r3 

'3 

3-« 

o 

ix 

T* 

a 

3-^ 

.ik 

z5 

VI 

•iJ 

O 

J  o 

• 

O 

5 

3-^ 

-J 

Zi 

^3 

-X 

a, 

3 

a 

+  X 

H 

'  *• 

-t  X 

-:< 

o 

•— < 

•  .s 

+ 

-}< 

O 

.  1. 

'-4 

•j 

::£J 

s-/ 

cu 

a 

J) 

X 

X 

+ 

3-^ 

72 

•>< 

O 

X 

X  X 

H 

i-( 

2 

•  • 

X 

’X 

'X3 

In 

< 

3 

H 

•-J 

X 

0  + 

< 

•i.'D 

3 

~T 

X 

, 

:£4 

+ 

3 

X 

< 

b 

X  X 

■>> 

>• 

h-4 

H 

xO 

'Jl 

*» 

•*  X 

*2 

X 

X  X 

<v 

3 

O 

O  X 

2j 

X  X 

3 

'.s 

l-( 

X  < 

< 

>• 

•X  X 

X  o 

• 

3 

— 1  a 

a 

>< 

< 

3 

1 

•  * 

<  X 

72 

X 

X  — 

-J 

•J 

< 

3-* 

H 

H 

«* 

a  .- 

V2 

O 

o 

X 

H 

««4 

uH 

72 

'O 

H  !l 

O 

1-^ 

X 

.-s 

II  — < 

• 

'JJ 

•-'4  >1  O 

II 

n 

V'i 

X 

••  X 

M 

O 

■_ii 

23 

» 

•  • 

••  II 

i.'i 

b 

X 

-'-N 

■!« 

Id 

+ 

< 

n 

•  • 

u 

•• 

VJ 

X  -fc 

X 

3 

— >  II 

- 

3 

-3 

*• 

— • 

— '  o 

'J 

VJ 

o 

X 

X 

X  o  •• 

*  ^  -K 
■ii 

O  II 

^  'Z  3^ 
■H  -J  J  -.O 
--J  -iJ 

a  -J  H-i 
3  -J  35 
■J  Z  ^ 


-T 
•J  < 

a 

u 

■<  3 
■H  O 


1— I  '^5 

•-J  -I 
33  2 


2  33 


2  X 
O  X  35 

_J  -x 
-3  >  H 
0X2 


o  <  o  o 
“)  X  o  x 
H  OH 
2  •0'< 
X  X  X  o 
X  H  'X 
X  3  + 


!X  H 
X  -’i 

X  ■O 
•j 

c 


ox  + 

3  0  0  X 

>•  X  X  X  H  X 
X  II  X  X  H 

X  H  X  ••  O  X  X 
H  X  H  O  X 
<C  X  X  X  <3 

w-J  1-1  X  X  X  X 

X  X  X  X 

X  XX 

O  X  s  C  X  — 1  X 

:3  o  o  <  X  'X  —. 

X  H  O  X  X  X 

-K  X  -X  X 
-X  X  ^  X 


a  X  o 
-■3  X  X 


o  o 

.X  X 
O  -<  X  X 
O  X  <  o 
X  O  X  H 

^  +  +  +  + 

* 

X  X  X  X  X 

X  o  o  o  o 

X  X  X  X  -J 
X  H  H  H  H 

X  X  X  X 
O  X  X  X  X 
H  X  X  X  X 
o  o  o  o 
p  o  o  o  x 

■K 

X  X  -X 


O  o 

H  X 
;t 
+  X 
X 
X  o 

o  X 

X  X 
X 

3  X 
X  x 
X  < 
X  X 
O  X 
X  X 


X 


X  X  X  M  H  ox  — . 

X  H  X  o  -:< 

H  +  3-iXSXXX 
O  X  <  2  O  <  O  X 

X  H  2  O  -J  X  X  O  ^ 

X  2  XX  X  ^ 

X  O  <  X  l-t  + 
00-KX<X  +X-* 

X  X  ^  -x  2  X  X  2  -^ 
— <■«  <OXw-i-X 
X  X  1-j  j_i  X  X 
X  II  •.  H  X  X 

O  ••  X  o  2  X  2  X  C  X 

X  X  3  I-I  >  X  o  2  X 

X  H  O  ■>«  X  o  X  C  -X  X 

X  2  a  -x  X  o  X  X  -x  2 

X  O  X  X  X  X  X  -h 

oooa  XX xa^ 

X  X  X  2  X  -Je  —.—<2 
X  X  X  X  X  ^  X  X  X  a 
X  2 

X  X 


ZZii  ACTIVATC  ;  DLGl.M  i*ACl'LVATS,  U,  TAbKPTK)  ;  (DATA.  PKlOKlTY,  liCAP)  ; 


22y  (UATA,  a,  PC);  (UaTA,  T*) 

23U  (*' rAiJK.PTK'  IS  KliLATlVli  TO  Tilt  liASt  OF  Tilt  FAUtUT.  lltAP  AND  T  AKt 

231  KtLATIVt  TO  'TASKPTK'  .  THIS  INSTRUCTION  WAS  WKlTTtN  WITH  Tilt 

232  ASSUliFTLOM  THAT  tNTRY  FRAMtS  LMMtUiATtLY  FOLLOW  THt  tNTRY  OFFStT 


'if- 

O 

0 

t-4 

»-4 

c.^ 

< 

3 

N3 

3 

52 

'o3 

3 

■k  ^ 

H 

< 

02  -k 

75 

H 

7J  70 

H  05 

•-4 

U4 

>-♦ 

b 

1—1  3^ 

'3 

2 

M 

0  H 

ri 

O4  3 

9-4 

3 

32 

05 

•3 

Ch 

Z5 

--N 

9-4 

■}« 

3 

•T" 

< 

g 

3 

■K  -K  ^ 

cu 

a 

3  O4 

3 

< 

i< 

r-*  H  -!« 

a 

<  3 

•VO* 

3 

a 

Z  Z  >■ 

Ol 

a 

3 

O4 

b 

a 

a  a  5-1 

C 

z 

b  0: 

3 

1— i 

'-j 

S  Z  I-* 

3 

2 

*  03 

0 

3 

iS 

< 

z  z  a 

3 

'w'  :::3 

13 

< 

{3 

> 

*3 

'J  CJ  o 

•K 

a 

9-4 

,— t 

< 

l-l  1— 1  >— I 

3 

+ 

< 

75 

3 

a  a  a 

77* 

U 

3 

3 

b 

a  a  ^4 

0 

3  -k 

1— 1 

<  <■>< 

•  «» 

a 

>- 

3  JO 

70 

32 

a 

•  • 

a 

H  72 

-^0 

a 

^  ^  -"s 

3 

2 

3  -k 

a 

9-4 

70 

r-t 

H 

Z  Z  -)e 

3 

a 

3 

12 

75 

~Z  ‘C 

1— 1 

•-I  i-<  <C 

a 

a 

’—4 

75 

.J 

a 

a 

_i  -J  J  a 

• 

•it 

< 

3 

3 

2u 

a 

•a  < 

•  • » 

+ 

70  3 

O 

'j  >  =3 

— 13 

3 

3  *3 

< 

3 

3 

»— t  (-4  a  •!< 

a 

3  3 

a 

*~^ 

52  H 

'jj 

T* 

3 

a 

3 

?-t  Z  J 

—4 

O4  > 

5-4 

9-4 

3  75 

3 

< 

Cs5 

<  <  • 

^^4  jj 

a 

■3:  3 

g 

H  Z  — 

a 

•• 

a 

z 

'-4 

3 

■-T 

■k 

a  >•  y 

2 

a 

a  • 

a  0 

75 

3 

a 

■)<  2  04 

O 

2 

2  —4 

9-4 

3 

C 

0  3 

t-i 

o 

z 

'-/■«  Wl 

a 

2 

0  a 

O4 

3  > 

'■i4 

3 

j-i 

V-X 

< 

a  a 

0  a 

H  *-4 

.• 

j3 

+ 

• 

H 

a 

75 

'O 

> 

02 

..  a  .. 

■— 1 

•f 

> 

9-4 

3  3 

3 

o 

-*0  ^  as 

a 

a 

ymm 

a 

3 

3  < 

•a  'a  'O  H 

9-4 

a 

a  2 

a 

t-4 

■k 

* 

:iJ 

<  a  a. 

'  -■ 

H  0 

■f 

• 

3 

70'^ 

• 

< 

kj 

3 

a 

2  c  II  z 

3 

a  a 

•y 

3 

O 

c  a 

H 

a  ••  -a  a 

a 

z 

0  a  -it 

3 

• 

H-l 

33 

a 

H 

2 

-.4 

>4  a  2 

3  ••' 

t— t 

a 

tl 

n  II  — 

a 

H  II 

52 

—.a  0 

3  3 

'jZ 

b 

--j  < 

..  .¥  o  (1 

It 

a 

•  • 

9-4 

a  a 

3 

< 

<!t 

'j 

3 

• 

>4  .. 

II 

't' 

3 

2  0 

3  11 

• 

C-t 

< 

a 

a 

II 

•  •  — ^ 

75 

3 

2  a  a 

3  .. 

> 

M 

O 

O  O 

-• 

3 

a  a 

O4 

'3 

•K 

a 

3 

-.1 

ui  yio  O 

-~>>* 

U.4 

■h  -X  -It 

-k 

3  — 

< 

+ 

v5 

z  z  o  a  04 

—4 

a  a 

'3 

75  3 

a 

< 

t-t  M  i-i  a 

-s 

o 

a  a 

9-4 

^  >0 

M  H 

04 

+ 

< 

• 

a 

33 

j  a  a  <  a 

a 

0  z 

3 

M 

^  3 

a 

H 

a  2  04  a 

.« 

•  a 

•  • 

•  H  a 

3 

O4 

w5  •• 

< 

O 

oJ 

o 

C-l 

■T* 

3  0 

3 

'J 

3S 

>j 

-¥14 

b 

a 

+ 

+  +  +  -f 

+ 

+ 

+  -f 

3 

3 

>5  + 

< 

M 

H 

:-i 

+ 

+ 

3 

9-h 

^  II 

+ 

i-t 

b 

*3 

n 

::tf 

a  a  a  a 

a 

a 

a  a 

a  •• 

3  52 

In 

< 

•  • 

3 

H 

H  H  H  H 

HO 

a 

3  H  H 

II 

a 

3 

<  H 

M 

TS 

« 

a  a  a  a 

Om  04  CU 

04  O4  04 

3 

>  — < 

04 

-4  O4 

+ 

C-H 

a 

z  s  z  z  z 

z  z 

75 

35  M 

c-4  -r* 

M 

'-0 

H 

H 

2 

ia  jj  oj  3 

OJ 

II 

"-J 

II 

a  a 

0 

M 

54 

11 

3 

3 

O 

Z 

H 

^  ^  ^  ^ 

H 

H 

H  a 

3 

z 

►• 

3  H 

-T 

< 

3 

M 

a 

■  -■ 

—4.  ^  - 4 

— ^l_-4 

3 

a  a  a 

3 

C 

'M 

•K 

•K 

■K 

a 

a 

«k 

P 

3 

■Jc 

■a 

a. 

'-'H 

75 

75  75  75  75 

a  a 

•a  a 

75  75 

04 

'-<'';5 

202  S  [rt.-lPTR  +  LLNKOJ  :=  0;  (*LIUK*) 

263  S  [TtMPTK  +  UATALOCKO]  :=  0;  (*UNLOCRtD*) 

264  S  [TtMPTK  +  tXCtPTOj  :=  U; 

263  S  [TtMPTK  +  TASKFLAGO]  :=  1 ; 

266  S  [TtilPTK  +  WAITOJ  :=  0; 


iNTciKFKllT.iK  IJOUKCl;  LISTING 


1 


C3  O 
II  II 


■it 

V3 


•-J 

•  • 

'X 

X 

a 

NJ 

3 

1— 1 

< 

'.0 

ua 

• 

■X 

2^ 

VI 

-2 

•  u 

+ 

1&4 

><  < 

e-i 

><  O 

VO 

■)« 

-v-o 

f 

r-<  ^ 

X 

X 

H  3 

1 

rr 

■73 

VO 

'X 

12  < 

X  X 

< 

c 

•X  X 

22 

X 

■K  3 

-J 

u 

<  3 

>— S 

<k 

< 

—  X 

VJ 

H 

3 

•>c 

< 

< 

x 

1  =-* 

u: 

• 

X 

> 

3 

=3 

w  < 

< 

■X 

•K 

X  3 

• 

1  'X 

X 

S-l 

3 

M 

1 

> 

H  X 

VJ  VO 

r2 

HI  ITT 

X 

■is  X  £-.  -:s 

X  o 

• 

li2  ^ 

■X 

■IS 

•X  •  3  -X 

o 

'r7 

',y 

"Zi  —*1-1 :3 

r“4 

iXi  H 

<  ^ 

X 

Z2 

-X  -X  3  -X 

X  X 

<S 

X  O 

3 

X 

3  a-  :i4  :3 

3 

■■j 

■o  t: 

+ 

3 

3 

•‘V 

’-M 

<  3 

X 

■X  x 

i-l 

■X  3 

o  •• 

o 

H  -.3 

o 

3  73 

CX4 

X  3  3  > 

X 

Z2 

>< 

•  * 

73 

X 

>* 

H  < 

>* 

-  O  3  X 

o 

H 

««» 

-< 

X 

X 

22 

II 

X 

5-*  X  H 

b  + 

*— < 

< 

Cx« 

*• 

3  X  3 

X 

=3 

2i2 

+ 

X  XI 

!3 

O  X 

TT 

H  H  X 

■«: 

o 

1— 1  ^ 

•73 

X 

X 

3  -f-  X  -K 

•X 

•-0 

H  O 

h- 1 

•o 

3  H 

X  H 

■K 

X  53  X  >- 

< 

V3  H 

3S 

a< 

'3 

+ 

•X 

•X 

•X 

—  X  3  H  X 

3  3 

& 

X  3 

•X 

• 

S  c-»  H  a- 

■z 

M 

n 

X  H 

H 

•X 

-3  O 

X 

3.i 

•X  -I-  -IS  3 

a 

+ 

-I  M 

•73 

X 

X 

•X 

X  XX 

•yj  + 

c 

X 

3 

< 

X  3 

■IS 

M 

X 

u 

* 

1-4 

3  '73 

3 

<3-  X 

■n 

TT!i  ”.'J 

*-> 

X  3 

H  'X 

< 

^  X  X  ••  3 

Jj 

H  VI 

a. 

•!< 

X  '-J 

o 

'X 

3 

■IS  ■*  H  3  X 

rs 

•< 

':z 

:-•  H 

X 

o  X 

•X 

llj 

3  3  X  Z  -X  3 

jj  jj  — 


O  -J  -J  II  H  O' 


> 

:_i 

X  -X  -X 

X  X  z 

«-4 

X  < 

< 

X  •• 

-t- 

•X 

'-'T> 

3 

VO 

H  "X 

X  Z  X 

> 

0 

'X 

X 

o 

3  3 

C-( 

'X 

V'O 

■X  <  X 

< 

X  X 

VO 

— y 

:d 

-1- 

X 

3 

u 

X 

H 

H  >  'X 

X  -X  3 

23 

H  ir> 

23 

X 

X  3 

VO 

-J  VJ 

X 

<c 

X 

• 

<  X 

■K  <t:  o 

< 

3 

z  Cii 

—5 

<c 

X 

Z,  22 

3 

X 

22 

.4k 

>  H  3 

^3  X 

Ch 

J  X 

X 

X  Z 

23 

'— * 

H  32 

Ij 

X 

jj 

H 

X  X  '■^ 

X 

VO 

X  3 

'/O 

X  X 

H 

Oi 

r3 

•X 

x 

O 

X  H  <^< 

X  p 

r) 

X  -X 

• 

3 

X 

0  ‘o 

X  X 

C""* 

H 

«(y4 

XX  X  3  X 

Z  X  X 

-■0 

X 

)-* 

•X 

.■5 

X  z 

VJ 

<  /\  VJ  O 

X  3 

•X  <C 

VO 

••  + 

0 

H 

"M 

H  II 

+ 

■1- 

< 

H 

N/  3  ■*< 

< 

3  3  >. 

CJ 

X 

z 

X 

a- 

•  • . 

3 

< 

'^'X 

II  X  > 

■X  -X  X 

X 

X  3 

H 

114 

22 

IS 

20 

X 

+ 

3 

a.  3 

X 

X  X  "X 

•2 

-  < 

4 

X  3 

«• 

•  • 

X 

22  — ^ 

X 

2 

■yo 

a,  o  3' 

H 

3  H 

2: 

S-/ 

X 

“5  P 

H  ofi 

ai 

2U 

-lO 

•  • 

X 

a 

3  • 

-X 

••  2S  < 

lu 

H  X 

< 

Id 

X 

It 

04  2^ 

•T* 

•X 

•X 

.  OS  'X 

< 

£Li  X 

U2 

X 

X  z 

:-■ 

•  • 

•n  b 

X 

a 

s-< 

22 

N 

3  X  "X  X 

■K 

>.  3 

>- 

ii  3 

10 

X 

b 

X 

* 

H 

3 

3  X 

''J 

X  3  3 

3S  -x  -x 

'X  Xi 

'*0 

3  Z 

a« 

'X 

X 

U 

3 

- 

X  X  3 

H  X  ”5 

H 

*s:  s 

23 

-y 

z  z 

*T* 

**7* 

H 

—  H 

■K 

3 

22 

X  X  Z  'X 

3  3^ 

72 

M  0 

a« 

X 

■X  3 

0 

K. 

V2  — * 

VO 

•X 

VO 

jJ 

X  H  3  3 

/■^ 

•J  X  i_( 

-  'X 

X 

X 

y* 

70 

Z^Js  X 

3 

X  ^ 

■is 

liO 

* 

■s  — < 

•K 

1&4 

3 

I14 

3  '-'■7J 

X 

X  'X 
< 

•X 

■x 

H 

■J 

H-i 

3 

,M 

cn 

O  1^  X 

3  ^ 

C4  .3  ^ 

j->  0  CO 

o^  0 

s'j  sn 

VN 

0  f>- 

CO  ON 

O  O  O 

rs. 

>•  r> 

!'«.  f>. 

X  X 

cn  CO  CO 

CO  20  20  so 

CO  ON 

ON  ON  C3^ 

ON 

ON 

ON  ON 

ON  CN 

rv| 

CM  CM  CM  iM  ^ 

CM 

CM  CN  CM  C>4 

CM  CM  CM  CM  CM 

CM 

CM  CM 

CM  CM 

CM  CM  CM 

CM 

CM 

CM  .-M 

CM  CM 

300  tLS£  liliGlN  (*TASKS  IN  gUEUL*) 

301  (*F1U0  TllL  LNO  OF  TllL  (^ULUL*> 

302  TLMFTK  :=  SlTL.lPTKj  ;  (*SLT  TLilFl’K  TO  TiiL  FINST  TASK  IN  TllL  qULUL*) 

303  WHILL  SlTL.lFTU  +  LINKOJ  <>  U  00 

30^  TliIFTk  :=  S  I  I'LMFTk  +  LlNKUj  ; 


iO:i  (*Tt:HFTK  FUliiTii  TO  THt;  LAST  TASK  IN  QULUE*) 

300  b  ITEMFTK  +  LINKOj  :=  OUKUliNTJOb;  (*L1NK  OALLKK  TO  OULULI*) 

307  clNU  (*TAbKb  IN  oULUO*)  ; 

308  (*011fc:CK.  TO  btt:  if  thl  calleu  task’s  kntkt  is  OFFN*) 

309  IF  S  lEFK/iilFFTK  +  iiUATtO]  =  1  THKN  BFGIN  (*fc:NTtiT  OPKN*) 


X 

■J3 

•J 

^  M 

< 

X 

3  T. 

«?• 

< 

X 

y) 

S3  ^ 

^£4 

^  'j: 

-o  < 

< 

73 

•-3  -.0 

a 

Zju  ^ 

» 

'J 

>•  u 

X 

"J* 

as  -J 

< 

H  -J 

< 

3^ 

u  3 

7J 

a 

■3 

••  •— < 

a  — .  vT 

a 

3  O  as 

< 

<  >  aj 

a 

X  ■» 

•  Ch 

a 

a 

3  iS  ^ 

3 

3  1 

^  0  3 

*-<4 

w<i4  ^3 

'-N  0 

*j3  ^ 

n 

X  a  >1 

0 

a  ^  i4 

OH  -N 

o  ■}<  o 

»» 

a  3 

o  o  +  - 

a  3 

X  a  —  X  a 

a  < 

■ji  'j 

X  -a  0  0  X 

X 

+  3  -J  3 

is  a 

H  <  X  — (  a 

0 

+ 

O  M  ••  ••  •• 

H  3 

3  a  a  X  0 

0-3  C  3  —  a,  a 

a  a 

a  a  a  a 

0 

••>>  U  a  3  <  73 

•  a 

a  a 

••  H  rr 

—  3  -x  ••  a.  <  +  a  < 

•  3  <  +  < 

a 

--v  ii 

X  o 

OHO  H 

a  3 

+  3  NI  a  3  H 

O  a 

X  < 

< 

a  -<  H  a  a  II  B 

-0  +  H  a 

<  H  3 

o  --a  — <  3  ••  ••  II 

a  3 

H  ^ 

X  — 

5-  +  o  a  -a  H  B 

a  a 

X 

a  a  -s 

■s 

II 

-IS  ” 

a  a 

X 

<  X  0  a 

*a 

H  a  n  <  •  a  o  o  — • 

-^O  X 

a 

a  a  H  i>* 

3  a  ••  a  a  >  — .a  a  a 

■X  X  a 

o  - 

— 3  H  H  — * 

H  B  0 

a  <  a  a  <  o  <  a  a 

X  a 

•J 

a  3  3  a  X 

X 

•  • 

a— .»  •-<  -a  a  a  <  o 

O  H  + 

X 

X  M  a  0 

+  aoa-Na  aaan 

•a  3 

<  >< 

X  0  X  .  -.T 

a  — << 

3  a  '-<  a  1 

a  a  H 

H  X 

wa  X  X  a  •- 

■c  0 

aanoao  i++++ 

a  X  3 

<  H 

3  H  a  ^ 

2 

a  H  + 

^/J  H  <  iJ  ~3  ~1 

a  X  3 

a  3 

a  a  a  ax 

3  3 

<  O  aH  aa'Sjaa 

0  3  0 

X  a 

33—.^  0  a 

a 

3  <  X 

^Ba  +  3'-<’  aoooo 

X  a  a 

^  H  a  X  a 

a 

H- 1 

av  3  a-7-7-7n 

a_a 

a 

a  -a  H  a  < 

33 

3  +a-><o'  aHaHr-* 

a 

a  a  ^  a 

r* 

a  a  S^3  -a  3333 

a  X  B 

..< 

a  >  II  ..  a  a 

•  » 

B  X  a 

^  ^  tl  >-4  lU  '-aJ 

a  o  •• 

a  a 

a  ••  o"xi  3  a 

•  •  1*4  ^ 

a— «”Oa  0X333 

<  -a 

a  X 

^  rs  J  :sS 

•  •1 

Ba  3a--H3333 

a  a  H 

3 

X  X  3  ax 

••aaaaaa  3333 

a  a  3 

a  H  H  X  3  > 

'< 

H  a  a 

3  3  3  o  a  o  a  o 

a  a  3 

a 

a  a  a  a  a  a 

3.4  i-( 

N-4  ‘jJ  ^  ;3  — 

X  o  D 

3  a 

<  X  r:  H  3  0  3 

•c* 

■X 

■X  X  a 

a  3 

a  X  a  3  a  x  3 

'*1 

^  a  a  a  a 

a' a*  ,-1 

a  a 

a  H  a  a  a 

X 

H  — * 

a 

a 

o»-^J'^«^<alor>»coc^O  — 

rM 

O  f>-  3  o> 

0  —  iN  ro  <•  0 

:o  ON 

3  <-  .'j 

S4  CM  CM  CS  CM  S4  CM  CM 

,a  m  ,3  to  .0  to  to  to 

ro  .^o 

<  <r 

r>  m  ro  ra  m  n  <n  ca  .-n  ra  ta  ro 

r>  m  cn  cn 

ro  ,“0  cn  r)  rn  cn  m  CO  cn 

n  .0 

J4J  (b  ITtMFTK  +  WAITUJ  =  1)  THD<  (*PAKt;ilT  JAITLNU  TU  TEKllIIJATE*) 

344  (*WAKfc,  UP  PAKUNT*) 

345  ENTUhlNl^  (TUMPTK,  blTtilPTA  +  PKlOP.l  TYO]  )  ; 

346 


as  VO 

Vt.  < 

04  ^ 

3  - 

<  -1 

9-<  30 

-X  VO  >  ^ 

+:  3  ^< 

■K  VO  J  3 

-  -_/30 

•!c 

3  04  3 

a 

•J  3  30  3 

r-*  'll  VO  i-i 

3 

00  H  <:  04 

O 

3  3 

3 

, 

H  3  3  3 

3 

J 

•  4^ 

3  3  3 

~r0 

1 

■J 

3  3m 

1 

J 

-3  O 

a 

^3  <  f-i 

3 

:.J 

•X  3  II  04 

3 

> 

3  ••  3 

< 

It 

H  H  3  C 

3 

•» 

Q-  O  3 

04 

■x  o 

■J 

O  i 

*• 

04  3  H  •!< 

-«v  —•  •• 

*■3 

3  3  3 

3 

■X  3  -  3  II 

C-l  i-l 

<<;  V-O  3  3  3 

M 

0  3  —  J  •• 

a 

<  'O 

H  <;  O  3  H 

3  3  O 

H  t: 

3  3  3 

II 

O  <  1  m3 

33  jJ 

-  3  C5 

o 

0  3  o 

•  J 

0  3  3  3  3 

3  3 

3  —no 

% 

O  3  <  M 

O 

■X  3  ••O  •*  3 

^  o 

*M  3  H 

3  O 

O  H  X  3 

'J 

•  «* 

O  H3 

aS  H  3  3  o 

3  H 

3  3  3  3  3 

A  H 

3  O  3  H  -J 

o  o 

O  3  O  <  O  H  3 

-U 

X— 

V3  3 

C  O  3  O  3 

3  3 

M  3  o  H  <:  3 

■-J  "J 

M  VS  <  3  ■< 

■3  3 

O  H  <  +  3  H  O 

+ 

--v 

! 

'J  'J 

3  H  0  3 

3  3 

3  O  •  -3  O 

•*2 

1 

i 

O  X 

3  3  3  VO 

O  O 

03  O  3  M  O  •  • 

>-• 

3i  □ 

M  3  H  3  as 

o  o 

O  M  H  —  — ' 

■a 

1 

a. 

3  M  O  •<  O 

3  • 

O  O  -3  3  3 

<  - 

'-*3  3 

1 

'*>  H  + 

.«k 

•X  3  3 

a,  — I 

3  —  3  H  H 

uj 

"N— / 

1 

i 

i'  3  . 

'-'3  0  '3  3 

^  M 

O  •-<  w  II  0  3  3 

^  -IC 

3 

-»<  c-l 

M  VO  -  3 

o  — 

••H  o  ••  -3  rc  O 

3 

1 

-]  32  ? 

•J 

3  3  3  0 

•V3 

M  <3  VO  3  3 

’-J  -“i 

i 

•jj  as  3 

3  M  <  ',v  o 

3 

O  3  — '  3  M  3 

X 

•  •  ^  r>4 

O 

V3  3  3 

< 

M  •<  as 

o  o 

11  H  -i;  o  o  — 

o 

1 

u  o 

O  Z  H  au  —H 

VO  •• 

^  3 

03  H  O 

_  ,1 

-0  II  H 

3  — iM 

M 

3  ••  <  X  O 

3 

>✓  3 

3  Z  3  3 

■'Z) 

1 

•  • 

3 

3  -M  -3  -- 

3  3 

Z  <  3  O 

5 

3  O 

M  3 

H  — ' 

<31 

-3 

3-3  3  1 

O  M 

3  3 

M  VO 

3 

3  3 

H 

•  •  ^ 

■3  0“ 

3  3 

•  •  M  C-i  '3  M  ••  1 

O  3 

:-»  3  3  +  3  3 

VO 

O  X 

3  3 

o 

M  3 

3  H 

0  0  3' 

3  -C 

3  O 

_’  3 

O  'M 

O  X 

3 

U 

— ',0  -12 

i:  3  H 

3  X 

3  3  04  <  O  3 

3  3 

rz  3 

1  M  3  3 

•J 

3 

o 

3 

•  • 

H  •-*) 

3  3  3 

O  N-' 

3  OC  3  3  M 

M 

3  O 

•  •  -w  M  3 

o 

z  o 

3 

lb  *.J 

3  3  0  3 

<  X  O  3  M  3 

3 

H  X 

X  3 

o  z 

3  X 

•  • 

.0  'jJ 

H  O  O 

3  O 

HX  OT53S3M 

'M 

M  3 

3 

3  3 

3  O 

X  3  'O 

O  3 

J  4<  -J  P 

3 

-J 

O 

'm3  m 

'3  3 

bi4 

M 

'J 

5 

i-t 

^  '0 


CN  o  —  sO  ^  o  —  rj  .'I  u->  o  -o  o  —  .'j  ~a-  o  -.3  rs  o 

n  m  m  m  .-n  n  n  po  n  ,■*>  ro  .■'1  ro  n  o  m  .-n  (*i  m  n  .-*3  -o  -n  .n  -o  -->  -n 


NUliA^jh.  (LLVEL.bASh. 


v: 


■X 

jj 

■n 


3 

II 


■X 

•< 


H - -  3 

.  ..  O  O 

II 


C3  O 

n  n 


a 


3  O 

a  a 


o 

II 


3 


a  o 

..  >4  . 


o 

1&4 

z 

4-4 

•  • 

a 

V3 

^  *K 

o  a 

3 

*5 

N  < 

3 

••  >4 

3 

•K 

3 

3a 

x-4 

3 

H 

3 

3 

VJ 

a 

z 

:Q 

va 

•j 

•* 

Lj 

3 

-x: 

•  t 

3 

4-  ^4  r-J  ,d- 

3  39  3  3 

.*n 

.•o 

•3 


+  — ^  o 

^  3  H 
O  <3 
^  +  H  «; 

o  +  + 

j  -j 

3  :i4  ^  — 


o  o 

H 

)-l  < 

<  --J 

3  = 


— >o 

O 

Ui  -fi 
3  < 
<  ^ 
33  H 


O  3S 
•Ji!  O 

«-( 

-1  ^ 


3  O 
3  H 

ifj  ^ 

J  J 
J  3 
<  X 
■J  :o 


+  +  +  +  +  +  +  +  +  + 


3  i 

z 

3a 
3 
^  < 
ij 
aa 


VI  j 


+  +  +  +  +  + 
H  H  H  H  H  H 
VJ  -T  vj  ,T  VJ  V3 


+  + 
H  H 

V3  VJ 


+  + 
H  H 
VJ  VJ 


+  + 

H  H 

VJ  VJ 


z 

/-> 

«■» 

'-3 

+ 

'O 

73 

1 

/) 

It 

■> 

O') 

Z 

Z 

O 

V) 

1 

3 

o 

W' 

5 

1 

n 

* 

» • 

H 

x-V 

-XL 

t-4 

3 

•— ^ 

3 

< 

VO 

--N 

as 

•  ik 

1 

-3 

-J 

1 

> 

'.J 

VO  ^ 

-3 

4c 

Z 

• 

II  .*■• 

U 

'X 

••  ^ 

•  • 

O  3 

-H 

•J  CX 

H 

23  < 

3 

• 

1  ^ 

••  M 

M  aiS 

1-4  •• 

•  • 

^  < 

3  3 

?-•  + 

N 

04 

3  Z 

t3 

"-*4 

1  -K 

iJ  3 

\a 

•  • 

•  • 

3  x 

-« 

-rC 

3 

< 

3 

3 

"3 

3 

4-' 

H 

04 

73 

3 

< 

3 

3" 

3 

3 

m  <r 

-TV  O 

JO  3 

rO  -y 

3 

34 

1 

-X 


O  r>*  :3 


tiJJ;  HOUIFY  FUh  UlFFEKti'll  AKGUilENl  TYFES*> 


V3 

C 

:a 

— 1 

+ 

* 

■5< 

+ 

> 

yj 

llj 

S-H 

*w 

It 

w 

•Jt  --s 

2^ 

V 

■!< 

1X4 

jj 

"5  ^ 

v 

_i^ 

V5 

3  CJ 

H 

< 

^  < 

■**« 

23 

'-t>  H 

•■4 

25 

'vO 

a 

as!  VO 

Li 

-JO 

V3 

3 

V2 

i-t 

<  JO 

• 

c 

a 

:£4 

£-4  • 

•. 

1,^ 

as 

».  * 

•v" 

II 

a 

o 

JO  '-J 

*» 

•• 

C/) 

. 

•2 

o 

II 

OS  — >  J 

< 

— - 

*4 

II 

JJ  o  •< 

u  — 

< 

fl 

-J  2S  'O 

o 

■O 

V2 

H 

<  j  'j 

—  li- 

CJ  _]  i 

H 

H 

y) 

<  H  - 

•  - 

-3 

^  •  • 

•• 

•• 

--■ 

V3 

Cl,  tj  — . 

Cl-  < 

-0 

O  ^  ^ 

3S 

O 

— 4C-( 

•:< 

.* 

+  O 

3 

O  :i-— # 

+ 

V) 

•  • 

ciJ  o 

Q 

u  + 

Is-  yo 

VI  33  Q,  H 

< 

a-  o 

<-* 

1 

<03 

• 

<  ^  3  H  n 

•-J 

+ 

a  “0  H  + 

as 

23  O 

H  •* 

II 

■y^ 

1 

H 

i-< 

+ 

•  • 

H 

'J  3  :i3 

oJ  H 

•J  — • 

'J 

H 

tl 

^  13  H 

+  •• 

m  23 

a:  as  as 

•  • 

H 

3 

tl 

H  ^  H  ^ 

H  'J 

M  C-l  3 

1—4 

II 

oi  ::n 

3S  -K 

a.  3 

* 

“3 

ll- 

H 

3  3  3  O  -J 

C-t  Q 

:3  O  25 

3  -i:  < 

yj 

H 

M  H  3  H  H 

a,  C 

M  H  3 

H  -J  • 

as 

a 

Q 

H 

oj  as  36  — .  I 

^  H  iO  H  :/3 


3 

M 

a, 

3  3 

+  *-  ‘H 

.. 

•  • 

3  II  •• 

■-H 

'jj  .. 

3  - 

CS  II  *n  II 

3  3 

••  S  II  II 

•  • 

•  •  3 

3  •• 

3  3 

'3  3 

••  '3  '-CiJ  ••  + 

•3 

-J  ..  JJ  .. 

3  1  *3 

3  3 

3 

Cn  -3 

■3  3 

■3 

3  3 

H  H 

H  * 

'3  H  ■■r* 

3  -3 

■Si  3 

Si 

M  H  cd 

3  3 

••  ij 

C<] 

3  as  as  H 

.• 

3  3  3 

3  H  * 

3  -3 

■—" 

■J 

•  ■ 

<  H  H  H  H 

3  :-•  H  H  H 

■r' 

3 

3 

cr 

3  3  SL.  -3  a.  II 

^  3  3  3  a. 

'3  n 

3 

3 

'j 

3 

3  JO  5:  -3  S  •• 

H  ca 

3  -/a  s  JO 

3  ..  3 

3 

3 

■Si 

Si 

«C 

>3*3*3 

3 

.-1  *  3  *  -3 

-,w  3 

C 

•Si 

■Si 

3 

H  '-^  H  H  H 

•3  3 

3  H  H 

•3  H  3 

3 

3 

ai 

'j3 

3 

3 

3 

3 

3 

3 

1-4 

•3 

'3 

3 

3 

^nJ^tnoooooooooor>*^^r-.p^r«<.^^rN.^>»^^^^c03^i^^o:o:oc^^ovocoa^r^3^r^^' 


H 

•  • 

y  a 

73  ^ 

3 

a  a 

C-4 

H 

> 

•• 

'-'■X 

a 

a  ‘-I 

>-l  3 

a  y 

a 

•  * 

73  H 

•— * 

M 

* 

M 

H  -y 

—  o 

73  <: 

y 

a  y 

y  a 

o 

O 

y 

o 

y  a 

o  ^ 

<  a 

y 

<  73 

y  y 

04 

•  • 

a. 

3 

Oi 

<  H 

3  3 

y  y 

a 

1 

y  -c 

y  y 

t— 

< 

«• 

a  y 

a  a  •• 

a  X 

CO 

y 

><  a 

a  y 

a  y 

y 

y 

a  y 

1 

73 

a 

y 

H  a  ^  O  3 

H  a 

II  II 

a 

u 

C  II 

y  * 

••  Eh 

••  ••  H 

H  + 

H 

y 

3 

a  +  y 

» 

•  * 

< 

y 

< 

1— 1 

y  — . 

> 

H  M 

—  o 

•  • 

y  y 

a 

fl 

o 

r-i 

o 

H 

^  P 

+  y  ^  M  < 

O  H 

o  a  — 

a  3 

y 

O  ••  Cx3 
'j  a  Q 
a  r;-i« 


•  73  H  <:  3 

a  <:  u  -3 

y:  a  <;  •){  H 

<  —  '-'■3 


23 

•d  w-jcn 

•a 

<  -73  II 

a 


'-'3 

y 

,, 

y 

a" 

y 

*• 

•• 

3  y  y 

a  y 

■j  a 

y 

> 

a-x  a 

uJ 

H  a 

y 

M 

H  '-'y 

a  5 

< 

o 

y 

Oi 

a 

x-« 

a 

■J  'j 
3  3i 
O  3  < 
Z  ^  Qu 

•*'  ^  , 

Eh 

-a  y 
a  73- 
z  y  -x 
y  -73  ^ 

y 

y 


73  y 

y  <  o 

3  23  H  ’ 


i  -yea 

I  J  3  H 

I  :-t  y  J«  y 

!  3  a  y 

lay  -fe 

I  o  a  a  ^ 
;  a  y  3 
I »-(  y  y  a 


u-)Of^ac3a  —  .'Mnsf730f^aya  —  r^!y-3-<r>or~wcNa»-w-Mr)>a-73oi''C03>a  —  .-4 
3^3^s^a^J\oaaaoaaoaO'-•—  —  ^4rsir4, -4  r4r4.-'4  r4r4, -SI. -on  a 

•■tf'T'J-J'^UOlTOlOuOUOiTOLnuOLlOl.OUOiAUOvni/OTOLnuO'-'Oi.'OTOuOTOUOi/^TOi/OlAuOTOTOTO  n 


INThlKPULTDK  iiUUKCL.  LlSTLi^lU 


73 

H 


22 

a 

a 

< 


3S 

a 

a 

< 

Oi 

< 


a. 

■3 

■ji 

3 


73 

a 


+  a 


•• 

a  a 

0*3 

<  a 

2Q  0 

Id 

+ 

•H 

aj  -73 

+  a 

J  '73  ■* 

a  J 

•a 

H  U 

U  jj  ^ 

a  < 

H  a 

ZD 

— *  3 

* 

>  'O  — 

+ 

3  H 

— <  < 

32 

'/)  "IS  32 

Cd  <  i-l 

a  '-x 

'73  3  !a 

H 

-J  H 

j  a  — 

H 

a  *• 

'd 

>*✓ 

+  :::  w 

'-'H  73 

Ha  a  /-N 

+  a 

H  3 

ll3  ■  * 

H 

a  a  -K 

H  a 

Q  .* 

32 

■73  — 

•  • 

a  a  OH 

a 

32  ^ 

-H  ^  0 

-i:  r  3 

0 

-H  a  0 

O-K 

3  a  -j  j  1 

H 

II  n  n  3 

V)  n  II 

hh  a  H  a 

•*  ••  v'J 

•73  II  n 

II  0 

1 

a  3  M  H  H 

T3 

— .  * 

3  1 

..  >g 

II  — » 

'Jj  3  l-H 

£-1  — , 

<-1  II  — ' 

■K 

k-4 

^  ..  u«  ^ 

a  'j,  -73  as  II  - 

'O 

0 

—  H  H 

■J  £-t  ..  I-i  — ^ 

::3 

1^(34 

— <  3  ••  a 

•73  — <a  — < 

Id  -^H 

10 

R  — 

••It,  3 

:a  a 

13 

•a  -a  '73  a 

a  n  —.-a  — a 

33 

••  H  -0 

•  • 

•73  M  i->  'j2 

*z 

a  a  3 

"  H  a  a 

di  a 

..  u 

•  • 

•—1  a  Id 

— •Cb  a 

■3 

•  • 

H  V3  hh 

-JS 

•  •  H  a  1—4  'd 

a 

0 

a 

0 

a 

0 

•73 

•73 

3 

0 

Nl 

>J 

.v3 

stf73or>.a3>0«— 

in 

0  (>.  a  c>  a  >— 

^^l.-n•3■'J->or^a3^a^ 

m  m  0 

j->  in  n  m  in 

\0  '•O 

vO  0  0  0 

Lr>  n 

tl 


507  liLSh; 

50o  blT]  :=  Oi;U  (fAL.Sb;) 

50y  iil-lb  (*ZX0K*); 

57U 


INTtKPUKtER  SOURCE  LISTING 


'Jj 

3 

3  3 

P-) 

O 

S 

Z 

3 

O 

.>-N  'w' 

3 

II 

O 

3 

•  *• 

Z 

Q 

3 

3 

,  O 

H  Z 

O  3 

a 

3  O 

H  s: 

< 

3 

II 

o 

< 

3 

3 

•z 

Cd  H 

H  3 

o 

< 

3 

•X 

3  O 

3 

3 

Z  O 

3  3 

•  3 

3 

1 

Z 

O 

o  o 

z-'Z  3 

3 

1 

o 

II 

3  3 

3  M  3 

•X 

o 

Iz) 

an  3 

0  13  0 

H 

o 

3  O 

3  3 

3  3  0 

3 

3 

O  3 

o  o 

3  3  3 

z 

3 

• 

3  • 

o  o 

3  3 

M 

3 

— ) 

3  3 

O  O  H 

o 

3 

3 

2  3 

3  3 

O  Q  Z 

3 

3 

O 

o 

H 

3  3 

3 

H 

3 

II  3. 

H  Z 

3  z-^3 

Z 

3 

/S  3 

><  3 

H  3  3 

Z 

3 

3 

3 

3  3 

Z  3  3 

3 

O 

c-i  3 

Z  3 

3  0  0 

Z 

Z 

o 

z  o 

3 

3  3 

H 

•  '1— 1 

3 

3  3 

3  O 

3  3  II 

3  z-S 

3 

O  Ou 
'O  H 
M  Z 

UI 

aJ 
as  as 
O  Z 

a 

•)«  — 
'jJ  o 
::0  as 
<  It  O 
U  W 
*0  0) 
Cil 

>^o 

o 

ca  ^  OS 
z  M  a> 

Cd  H 
Z  &t< 
3  i-( 


aj  H  II 
3 

as  H 
H  O  as 
■jJ  O 
II  3  O) 
■•  aj  3 
Oi  W 
Z  -X  O 
O  <^0 
M  as 
H  Z  (X 
<!-<£-• 
Z  O  Z< 
M  bJ  u) 
S  SQ  PS 
S  PS 
U  Cd  3 
H  O)  O  I 
-J 
bl 


3  bl  •• 
O  O 
—  O  as 
as  O 


oa 

as 

O 

C/) 

•-an 

Cd 

■X  o 

•'Cd  O 

—  o  as 

M  Cl) 

M-X  Z 
v-' 

II  /N 

■•  o 

Z  M 

M  Cd 

Cu 


3  O-X 
aS  Z  H 
H  M  as 

Oj  O 
II  O  ca 
••  O  ^ 
3 

Z  as 
O-  Q 
i-i  ^aS 

H  a: 

<  Z  Cd 
Z  3  -X 
M  '3 

3  as  Z  I 
H  3  3 


)  -X  » 
-H  3 
O  H 
C  3 
)  3  f-< 

1  3  O  •' 
1  cn  z  z-v 
I-X  * 

)  '-.'3  H 
)  3  3 

!  M  3 
1  Q  3  Oi 
Z  3  3 
3-X  3 

Z 


^cvic*i'^u'>\Of~-3a>0»—c^cn'i’ir(\or'-30NO*- 

r-.p^r^r-.r'»r-^r'~r~.p~3o0333cOc033OT<7'<T' 

i/immininvAvnininvAiAvnuniAiAunmunuiiAoi 


107 


VITA 


VITA 

Alan  A.  Garlinj^con  was  born  on  20  Au^^ust  1951  in 
Chicopee,  L-lassachuseccs  Co  Arthur  K.  Garlinj^ton,  Jr.  and 
Claire  Y.  (Cournoyer)  Garlington.  He  attended  ni^h  school 
at  Rome  Free  Academy  in  Rome,  New  York  and  graduated  in 
1969.  In  June  of  Chat  year,  he  entered  cne  USAF  Academy  in 
Colorado  Sprin^^s,  Colorado  and  subsequently  graduated  witn  a 
Bachelor  of  Science  Decree  in  Electrical  Engineering  in  June 
of  1973.  His  first  Air  Force  active  duty  assignment  was  to 
Undergraduate  Navigation  Training  at  MaCner  Arts  in 
Sacramento  California.  He  ^^raduated  in  April  of  1974  and 
entered  Electronic  Warfare  Training,  also  at  Mather.  Upon 
Araduacion  from  Electronic  Warfare  Training;  in  October  of 
1974,  he  was  assi^ined  to  the  62nd  Bomb  a  r  dine  nt  Squadron,  2nd 
Bomb  Win^i  (SAC),  at  Barksdale  AFB,  Louisiana.  In  March  1973 
ne  was  assi^ined  duties  as  vwin^  electronic  warfare  officer 
where  lie  served  until  enterin^^  the  Air  Force  Institute  of 
TechnolOjjy  School  of  En^iineerinji  at  Wright  Patterson  aFB, 
Ohio  in  Sept  1979.  He  is  a  member  of  Tau  Beta  Pi  and  Eta 
Kappa  Nu. 

Capt  Garlington  was  married  on  29  December  1973  in 
Rome,  New  York  to  Pasqualina  J.  DiMarco.  They  have  one  son, 
Christopher  Alan,  who  was  born  on  12  September  1979. 

Permanent  address:  0623  Williams  Road 

Rome,  New  YorR  13440 


108 


SCCUWTV  CUASSiriCATiON  OF  THIS  PAG£  fWhan  Datm  Sntarad) 


REPORT  DOCUMENTATION  PAGE 


I.  REPORT  number 


READ  INSTRUCTIONS 
BEFORE  COMPLETING  FORM 


2.  OOVT  ACCESSION  NO.i  3.  RECIPIENT’S  CATALOG  NUMBER 


AFIT/GCS/MA/81M-1 


4.  TITLE  (nd  Submit) 

PRELIMINARY  DESIGN  AND  IMPLEMENTATION 
OF  AN  ADA  PSEUDO-MACHINE 


7.  AUTHORfAj 

Alan  R.  Garlington 
CAPT,  USAF 


9.  perporming  organization  name  and  address 

Department  of  Mathematics 
AFIT/EN 


11.  CONTROLLING  OPPICE  NAME  AND  ADDRESS 


5.  type  op  report  a  period  covered 


MS  THESIS 


S.  PERPORMING  ORG.  REPORT  NUMBER 


8.  contract  or  grant  nUMBERCa; 


10.  program  element,  project,  task 
AREA  8  WORK  UNIT  NUMBERS 


12.  REPORT  DATE 


March  81 


13.  NUMBER  OP  PAGES 


14.  monitoring  agency  NAME  8  ADORESSCI/ d/««fant  Irom  Canfroltin«  Ollice)  I  15.  SECURITY  CLASS,  (ol  !hia  r.porfj 


IS*.  DECLASSIPICATION'  downgrading 
SCHEDULE 


l«.  DISTRIBUTION  STATEMENT  (tl  tbit  Rtport) 


Approved  for  public  release;  distribution  unlimited. 


17.  0ISTR18UTI0N  STATSMCNT  (at  tha  mbatract  antaead  in  3toek  20,  If  dilfarant  from  Raport) 


It.  sui^plcmcntaay  notes 


APPROVED  FOR  F  JRL::  release  AFR  19017 

Air  Force  Institute  of  Technoicny  (ATC}  FREDRIC  C 


^  >  MA 


ioULC  C. 

IIC  c.  LYNClAlajor,  USAF 


Wright-Patterson  Af B,  OH 


Diicctoi  ci  Public  Affairs 


19.  KEY  WORDS  rConilnw*  on  ravaraa  aida  If  nacaaaaiy  and  tdantify  by  btoek  nianbar) 

Ada  Pseudo-machine 

Compilers 

Computer  Programs 

Microcomputers 

Minicomputers 


20.  A0STWACT  fContInua  on  ravaraa  aida  II  nacaaaary  and  Idantify  by  block  numbar) 

4  .  .  . 

This  project  involved  defining  an  Ada  pseudo-machine  and  developing  an 
Ada  to  pseudo-code  test  translator.  The  translator's  front  end  incorporates 
a  table-driven  parser  that  can  parse  the  entire  proposed-standard  Ada  language. 
The  translator's  semantic  routines  allow  integer  data  objects,  several  control 
structures,  procedures,  functions,  packages  and  tasks.  These  routines  generate 
pseudo-code  that  is  executed  by  an  interpreter  program  included  in  the 
translator.  The  interpreter  constitutes  a  complete  description  of  the  pseud 


OD  1473  COITION  OF  I  NOV  45  |$  OSSOLCTC 


SCCUPIlTV  CLASSIFICATION  OF  THIS  FAOC  0«f«  Entarad) 


«CCUWITY  classification  or  THIS  PAGErWTiM  Dmtm  enf*r*d) 


BLOCK  20  continued: 

machine  whose  architecture  consists  of  multiple,  sC£.ck-oriented  proce.isors 
that  access  a  common  memory.  Interesting  features  of  the  project  include 
the  hash-coded  symbol  table  that  supports  Ada's  visibility  rules  and  the 
pseudo-machine  architecture  that  supports  Ada's  tasking. 


SCCUWITY  CLAS$iriCAT(0«l  or 


Er 


